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AMSTRAD CPC664 


Integrated Computer/Disc System 


About us.... 


The AMSTRAD CPC664 follows іп the tradition of the successful CPC464 computer 
system. The widespread acclaim given to this computer has encouraged us to take the 
next logical step, and to combine the best elements of the CPC464 and DDII disc 
drive, together with many new features and enhancements. The resulting package 
- the CPC664, offers a performance and wealth of facilities unrivalled in the world of 
personal computers today. 


Your product is supported by one of the largest consumer electronics organisations in 
the country, and the AMSTRAD computer users' club with its authoritative monthly 
magazine is already firmly established as the leading source of news and 
information. 


Available software and compatibility.... 


The CPC664 runs virtually all CPC464 software, giving the owner an instant and 
enviable choice of software from AMSOFT's extensive range, as well as the products 
of many independent vendors. 


Why disc? 


The disc is undoubtedly replacing the cassette as the data and program storage 
medium for all but the most casual computer user, and since the power and 
friendliness of the CPC464 quickly transformed ‘casual’ users into enthusiasts, the 
'664 will be the natural choice for many. 


Thank you Digital Research.... 


The power of Digital Research’s CP/M operating system has not previously been 
available at such low cost, and we look forward to the innovative software that can be 
written in an environment which provides over 160K of memory on each side of a disc. 
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Digital Research's Dr. LOGO has emerged as the most universal educational and 
teaching medium. Combining the unique user friendliness of ‘turtle graphics’ with 
sophisticated processing power, Dr. LOGO is acclaimed as the most comprehensive 
implementation of LOGO available. 


Thank you Amstrad! 


Both CP/M and Dr. LOGO are provided free with your CPC664 system. 


What's new? 


Тһе CPC664 also takes the opportunity to refine and add some features and BASIC 
commands not previously available on the CPC464 (area fills, dotted line drawing, 
character copying from the screen, frame flyback synchronisation, switchable cursor, 
etc.) Programs using these new features will not be downwards compatible to the 
CPC464, although transportability from the CPC464 upwards to the CPC664 is not 
compromised in any way. š 
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IMPORTANT 


Youmustread this.... 

Installation Notes 

1. Alwaysconnectthe Mains Lead to a 3-pin plug following the instructions 
contained in part 1 ofthe Foundation course. 

2. Never attempt to connect the system to any Mains Supply other than 
220-240V — 50Hz. 

3. There are no user serviceable parts inside the system. Do not attempt to gain 
access into the equipment. Refer all servicing to qualified service personnel. 

4.  Toavoid eye-strain, the monitor should be placed as far away as possible from 
the keyboard and operated in an adequately lit room. The monitor 
BRIGHTNESS control should be kept to as low a setting as possible. 

5. The computer should be placed centrally in front of the monitor, but as far away 
from the screen as possible. For maximum data reliability, the disc drive section 
ofthe computer should NOT be placed directly in front of the monitor, but to the 
right of it. Do not place the computer close to any source of electrical 
interference. 

6. Always keep disc drives and discs away from magnetic fields. 

7. Ifyou are operating a 2-drive system, keep the interconnecting ribbon cable to 
the 2nd drive, away from Mains Leads. 

8. Do not block or cover any ventilation holes. 

9. Donot use or store the equipment in excessively hot, cold, damp, or dusty areas. 


Operation Notes 


(Don’t worry if you are a little baffled by the technical jargon in this section; the 
importance of these warnings will become clearer as you work through this manual.) 


1 


Never switch the system on or off with a disc in the drive. Doing so will corrupt 
your disc, losing valuable programs or data. 
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Always make back-up (duplicate) copies of discs which contain valuable 
programs. It is especially important to make a back-up copy of the master CP/M 
system disc provided with the CPC664. Should you otherwise accidentally lose 
orcorrupt your disc, replacing it could prove expensive. 


Make sure that you do not accidentally overwrite your master CP/M system 
disc, by ensuring that the Write Protect holes on the disc are always open. 


If you are operating a 2-drive system, i.e. if you have purchased an additional 
AMSTRAD FDI, always switch on the 2nd disc drive before тае, on the 
computer. 


Never touch the floppy disc surface itself, inside its protective casing. 
Do not eject а disc while it is being read from or written to. 
Always remember that formatting a disc will erase any previous contents. 


The internal disc interface occupies a small portion of the memory that in some 

cases, was used by commercial writers of cassette based software for the 

AMSTRAD model CPC464. These cassettes will not operate properly with the 

CPC664 + Cassette unit. If you have any queries regarding cassette based 

software compatibility, contact AMSOFT on Brentwood (0277) 230222. Note 

Е that most major AMSOFT software titles are available оп disc for the 
664. 


Тһе licence agreement for your CP/M system disc, (which is electronically 
serial-number encoded) permits its use on a single computer system only. In 
particular this means that you are prohibited from giving any other person a 
disc with YOUR serial-numbered copy of CP/M on it. Carefully read the End 
User Licence Agreement towards the end ofthis manual. 
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Part 1: Setting Up.... 


The CPC664 can be set up with either: 


1. The AMSTRAD GT65 Green Tube Monitor 

2. The AMSTRAD CTM644 Colour Monitor 

3. The AMSTRAD MP2 Modulator/Power Supply and a domestic (UHF) colour 
TV receiver. 


Fitting a Mains Plug 


The CPC664 operates from a 220-240Volt~ 50Hz Mains supply. Fit a proper Mains 
Plug to the Mains Lead of either the GT65, CTM644, or MP2. If a 13 Amp (BS1363) 
Plug is used, a 5 Amp Fuse must be fitted. The 13 Amp Fuse supplied in a new plug 
must NOT be used. If any other type of Plug is used, a 5 Amp Fuse must be fitted 
either in the Plug or Adaptor or at the Distribution Board. 


Important 
The wires in the Mains Lead are coloured in accordance with the following code: 


Віџе : Neutral 
Brown :Live 


As the colours of the wires in the Mains Lead of this apparatus may not correspond 
with the coloured markings identifying the terminals in your plug, proceed as 
follows: 


The wire which is coloured BLUE must be connected to the terminal which is marked 
with the letter ‘N’ or coloured Black. 


The wire which is coloured BROWN must be connected to the terminal which is 
marked with the letter ‘L’ or coloured Red. 


Disconnect the Mains Plug from the Supply Socket when not in use. 


Do not attempt to remove any screws, nor open the casing of the computer, monitor, or 
Modulator/Power supply unit. Always obey the warning оп the rating labe] which is 
located underneath the case of the CPC664 and MP2, and on the rear cabinet of the 
GT65 and CTM644: 


WARNING - LIVE PARTS INSIDE. DO NOT REMOVE ANY SCREWS: 
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Connecting the computer to a monitor 


(If you are using the CPC664 with the MP2 Modulator/Power supply, skip to the next 
section.) 


1. Make sure that the monitor is not plugged into the Mains supply socket. 


2. Connect the lead from the front of the monitor, which is fitted with the larger 
(6-pin DIN) plug, into the rear socket of the computer marked MONITOR. 


3. Connect the lead from the front of the monitor, which is fitted with the smaller 
(5V DC) plug, into the rear socket on the computer marked 5V DC. 


4. Connect the lead from the back of the computer, which is fitted with a small 
(12У DO) plug, into the socket at the front ofthe monitor. 
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Connecting the computer to an МР2 
Modulator/Power supply unit 


The MP2 is an additional item that you may wish to purchase if you are currently 
using your CPC664 computer with the GT65 green tube monitor. The MP2 enables 
you to to use the computer with your domestic colour TV and thereby enjoy the full 
colour facilities of your CPC664 computer. 


The MP2 should be positioned next to the right hand end of the CPC664. 


1. 


2. 


Makesure that the MP2 is not plugged into the Mains supply socket. 


Connect the lead from the MP2 which is fitted with the larger (6-pin DIN) plug, 
intotherear socket ofthe computer marked MONITOR. 


Connect the lead from the MP2 which is fitted with the smaller (5V DC) plug, 
into the rear socket on the computer marked 5V ОС. 


Connect the lead from the MP2 which is fitted with an aerial plug, into the 
AERIALor ANTENNA socket of your TV set. 


Connect the lead from the back of the computer, which is fitted with a small 
(12V DC) plug, into the socket at the rear of the MP2. 
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Switching on - СРС664 and GT65/CTM644 system 


(If you are using the CPC664 with the МР2 Modulator/Power supply, skip to the next 
section.) 


Having connected up the system as shown previously, insert the Mains Plug into the 
Supply socket and switch on. Press the POWER button at the bottom right hand 
corner of the monitor so that it is set to the IN position. When the button is set to the 
OUT position, the Mains supply tothe system is OFF. 


Switch on the computer using the slide switch marked POWER at the right hand end. 


The red ON lamp at the top centre of the keyboard should be illuminated, and the 
monitor will display the following picture: 


Amstrad 64K Microcomputer (v2) 


$1984 Amstrad С. Electronics 
stand Eoconotive SoFteare Lid 


BASIC 1.1 


Ready 


To avoid unnecessary eye-strain, adjust the control marked BRIGHTNESS until the 
display is adequately bright for comfortable viewing, without glare or blurring of the 
characters on the screen. 

The BRIGHTNESS control will be found on the lower front panel of the GT65, or at the 
right hand side of the СТМ644. 


If you are using the GT65 green monitor, you may need to adjust the CONTRAST and 
Vertical HOLD controls оп the lower front panel. 


The CONTRAST should be adjusted to the minimum setting consistent with 
comfortable viewing. 
The Vertical HOLD control on the GT65 is marked V-HOLD, and should be adjusted so 


that the display is correctly positioned in the middle of the screen, without ‘jitter’ or 
‘roll’. 
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Switching on - CPC664 and МР2 
Modulator/Powersupply system 


Having connected up the system as shown previously, insert the Mains Plug into the 
Supply socket. 


Switch on the computer using the slide switch marked POWER at the right hand end. 


Тһе red ON lamp at the top centre of the keyboard should be illuminated, and you 
must now tune in your TV set to receive the signal from the computer. 


Ifyou have a TV with push-button channel selection, press a channel button to select 
a spare or unused channel. Adjust the corresponding tuning control in accordance 
with the TV set manufacturer's instructions (the signal will be approximately at 
channel 36 if your TV has a marked tuning scale), until you receive a picture that 
looks like: 


Amstrad 64K Microcomputer (v2) 


91984 Amstrad Consumer Electronics 1416 
and Locomotive Softuare 


BASIC 1.1 
Readu 
u 


Tune in the TV set accurately until the clearest picture is seen. The writing will be 
gold/yellow on a deep blue background. 


If your TV has a rotary programme selector knob, turn the tuning knob until the 
above picture appears and remains perfectly steady. (Again, at approximately 
channel 36). 
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Other Connections.... 


If you wish to connect any other peripherals to the standard system, namely: 


Joystick(s) 

Cassette unit 

Printer 

2nddiscdrive 

External amplifier/speakers 
Expansion device(s) 


++ details will be found in part 2 of this Foundation course. 


Finally, check that you have observed the following warnings given at the beginning 
ofthis manual, in the section entitled IMPORTANT": 


INSTALLATION NOTES 1,2,4,5,6,7,8 
OPERATION NOTE 1 
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Part 2: Connecting your 
peripherals.... 


This section explains how the various peripherals, or add-ons, are connected to the 
CPC664 system. Details concerning the use of these devices will be found in the 
appropriate sections of this manual. 


Joystick 


The AMSOFT joystick model JY2 is an additional item that you may wish to 
purchase if you are using the CPC664 computer with games software which 
incorporates the facility for joystick control and ‘firing’. 


Connect the plug fitted to the JY2 lead into the socket marked JOYSTICK on the 
computer. The CPC664 can be used with two joysticks; the second joystick should be 
plugged into the socket on the first joystick. 


The AMSOFT joystick model JY 1 is also suitable for use with this computer. 
Further information on joysticks will be found later in this manual 


Cassette unit 


Programs may be loaded from, or saved to tape instead of disc. The commands which 
instruct the computer to direct data to and from disc or tape are explained later in this 
manual. 


Toconnect your cassette unit to the CPC664, you will require the AMSOFT CL1 lead, 
or any other equivalent standard cassette-interconnecting lead. 


Insert the end of the lead with the larger (5-pin DIN) plug, into the socket marked 
ТАРЕ on the computer. 


Insert the plug at the end of the Blue cable into the socket on your cassette unit 
marked REMOTE or REM. 


Insert the plug at the end of the Red cable into the socket on your cassette unit 
marked MIC, COMPUTERIN, or INPUT. 


Insert the plug at the end of the White cable into the socket on your cassette unit 
marked EAR, COMPUTER OUT, or OUTPUT. 
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It is important to remember that the successful transfer of data between the CPC664 
and cassette is largely dependent upon the correct setting of the LEVEL or VOLUME 
control on your cassette unit. If you cannot seem to load or save programs properly, 
experiment with different LEVEL control positions until the optimum setting is 
found. 


Printer 


Тһе CPC664 may be used with any Centronics compatible parallel printer. Ifyou in- 
tend to connect the AMSTRAD ОМР! to the CPC664, simply use the interconnecting 
lead provided with the printer. 


If you wish to use any other Centronics compatible printer, you will require the 
AMSOFT PLI printer interconnecting lead. 


Connect the end of the lead which is fitted with the flat edge-connector plug, into the 
socket marked PRINTER at the rear of the computer. 


Connect the other end of the lead which is fitted with a Centronics style plug, into the 
socket at the rear of the printer. If the printer is equipped with security clips at each 
side of the socket, these may be clipped into the cut-outs at the side ofthe printer plug. 


Details of printer operation will be found later in this manual. 


А 2nd disc drive (AMSTRAD FD1) 


The AMSTRAD FD1 may be added to the system as a 2nd disc drive. The advantages 
of a 2-drive system will be particularly apparent to the regular CP/M user, since 
many programs are configured to run with the library program disc inserted in one 
drive, and the working data files stored on a disc in the second drive. 


Operation under CP/M always requires that a program be loaded from disc (there is 
no access to the ROM BASIC). Since CP/M allows the use of multiple files by an 
overlay technique that permits programs that are larger than the RAM memory, the 
actual library disc may contain so many program files that there is little workspace 
leftforthedata. 


Thanks to the versatility of the utilities provided with your CPC664 system disc, you 
can do all necessary file maintenance; copying, erasing etc, on a single disc drive. 
However a second drive will certainly speed up these processes and reduce the scope 
for accidents. 


To connect the FD1 to the CPC664, you will require the AMSOFT DI? disc inter- 
connecting lead. 
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Connect the end of the lead which is fitted with the larger edge-connector plug, into 
thesocket marked DISC DRIVE 2at the rear ofthe computer. 


Connect the other end ofthe lead which is fitted with a smaller plug, into the socket at 
the rear of the FD1 disc drive. 


DON'T FORGET - Before connecting or disconnecting the 2nd disc drive, make sure 
that any discs are removed from both drives, and that the system is switched off. If 
connections are altered while the system is on, it is likely that the program in the 
computer’s memory will be corrupted. Always save any valuable programs before 
meddling with connections! 


When the FD1 is connected to the CPC664, FIRST switch on the FDI using the slide 
switch on the rear panel of the disc drive, THEN switch оп the CPC664 using the slide 
switch at the right hand side of the computer. Both the green and red indicators on 
the front panel of the FD1 should be illuminated. The 2-drive system will then be 
ready to operate. 


Details of 2-drive operation will be found later in this manual. 


External amplifier/speakers 


The CPC664 may be connected to a stereo amplifier and speakers to enjoy the full 
3-channel capabilities of the computer. 


The input lead to your stereo amplifier should be terminated with a 3.5mm stereo 
jack plug, which should be inserted into the socket marked STEREO on the computer. 


The connections to the jack plug are: 


Plug tip - Left channel 
Plug inner ring - Right channel 
Plug rear shaft - Ground (Common) 


The CPC664 will provide a fixed voltage signal out of the STEREO socket, and you 
should therefore use the controls on the amplifier itself to regulate volume, balance 
and tone. 


High impedance headphones will also operate with the CPC664, however the volume 
will not be adjustable by the VOLUME control on the computer. Low impedance 
headphones, such as those usually used with stereo systems, will not operate directly 
plugged into the computer. 


Details concerning the directing of sound to the required output channel will be found 
later in this manual. 
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Expansion devices 


Expansion devices such as serial interfaces, modems, light pens, ROMs etc may be 
connected to the CPC664, using the socket marked EXPANSION at the rear of the 
computer. 

'The AMSOFT speech synthesiser/amplifier model SSA2 may also be connected to 
this socket. 

Details of connections to the EXPANSION socket will be found in the chapter entitled 
‘For your reference..." 


Finally, check that you have observed the following warnings given at the beginning 
of this manual, in the section entitled IMPORTANT’: 


INSTALLATION NOTES6,7 
OPERATION NOTES 4,8 
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Part 3: About Discs.... 


The AMSTRAD CPC664 uses 3 inch compact floppy discs. We strongly recommend 
that for reliable data-to-disc transfer, you use only AMSOFT CF2 compact floppy 
discs. Discs made by leading manufacturers however, may also be used. 


Insertion 


Each side of a disc may be used separately. A disc should be inserted with its label 
facing outward from the drive, and with the side that you wish to use face up: 
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Write Protection 


In the left hand corner of each side of a blank disc, you will see ап arrow pointingtoa 
small shuttered hole. This is called the Write Protect hole, and facilitates protection 
against erasure or ‘overwriting’: 


When the hole is closed, data can be ‘written’ onto the disc by the computer. When the 
hole is open however, the disc will not allow data to be written onto it, thus enabling 
you to avoid accidental erasure of valuable programs. 


Various compact floppy dise manufacturers employ different mechanisms for 
opening and closing the Write Protect hole. The operation may be carried out on the 
AMSOFT СЕ? compact floppy disc as follows: 


To open the Write Protect hole, slide the small shutter located at the left hand corner 
of the disc, and the hole will be opened: 


A 
Write Protecthole (SPEN) | 

| 
Shutter (2, Shutter. (TT 
OPEN 


CLOSED g 
| 

Write рс ом Write Protection OFF 
u sass u эн 


"То close the Write protect hole, simply slide the shutter to its closed position. 
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Some other compact floppy discs employ a small plastic lever located in a slot at the 
left hand corner: 


Lever 
jan = 
% 
Write Protect 
hole 
(CLOSED) 


То open the Write Protect hole on this type of disc, slide the lever towards the middle 
of the disc, using the tip ofa ball-point pen or similar object: 


Slide Lever 
towards middle > 
of disc 
CL 


Note that regardless ofthe method employed to open and close the Write Protect hole, 
opening the hole in all cases facilitates protection against overwriting. 


IMPORTANT 


Always ensure that the Write Protect holes on your master CP/M system disc are 
open. 
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When Your Disc їзїп 


At the front of the computer's dise drive, you will see a red indicator lamp, and a push 
button for Eject: 


\ 


Eject 
pen 9r | dt 
Indicator Lamp 


This indicates that data is being read from, or written to the disc. 


Ifa 2nd disc drive is connected, the red indicator on the 2nd disc drive (Drive B) will 
illuminate constantly. It will extinguish when the main disc drive within the 
computer (Drive А) is reading or writing to disc. 


Eject Button 


Pressing in the Eject button allows you to remove your disc from the drive. 


Finally, check that you have observed the following warnings given at the beginning 
ofthis manual, in the section entitled IMPORTANT: 


OPERATION NOTES 1, 3,4, 5,6 
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Part 4: Getting Started.... 


Before we start loading software and saving programs to disc, let's get familiar with 
some of the keys on the computer. Those of you who are experienced in using 
computers may skip this section. 


With the computer switched on and the opening message on the screen, we're going to 
find out what the various keys do..... 


<94) LARGE ARROW KEYS 


The four large arrow keys (next to the [COPY] key), are called the ‘cursor keys’. The 
keys move the position of the cursor (the small solid block) on the screen. 


Press each of the cursor keys in turn, and you will see the cursor move about the 
screen. 


[ENTER] 


There are two [ENTER] keys. Either of these keys enter the information that you 
have typed into the computer. After the [ENTER] key is pressed, a new line is started 
on the screen. Each instruction that you type into the computer should be followed by 
pressing the [ENTER] key. 


From now on, we will show [ENTER] as meaning press the [ENTER] key after each 
instruction or program line. 
[DEL] 


This key is used to delete a character to the left of the cursor on the screen (for 
examplea letter or a number) which is not required. 


Type in abcd and you will see that the letter d is positioned to the left of the cursor. If 
you decide that you do not want the letter d, press [DEL] once and you will see the d 
removed. If you press [DEL] and continue to hold it down, the letters ab c will also be 
removed. 


[SHIFT] 


There are two [SHIFT] keys. If you press either of these and hold it down whilst typing 
acharacter, a capital letter or upper case symbol will appear on the screen. 
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Туре in the letter е then hold down the [SHIFT] key and type in the letter e again. Оп 
the screen you will see: 


eE 
Now type in a few spaces by holding down the space bar. Try the following using the 
number keys which are on the top line of the keyboard, above the letter keys. Type in 


the number 2, then hold down the [SHIFT] key and type in the number 2 again. On 
the screen you will see: 


2" 
You сап now see what happens when the [SHIFT] key is held down whilst pressing a 


character key. Experiment by pressing any ofthe character keys, eitheron their own, 
ortogether with the [SHIFT] key. 


[CAPSLOCK] 
This has a similar operation to [SHIFT] except that you only have to press it once. 


From then on each letter that you type in will be in capitals, although the number 
keys will not be shifted. 


Press [CAPS LOCK] once, then type in: 
abcdef123456 
On the screen you will see: 
ABCDEF 123456 
You will notice that although all the letters are shifted to capitals, the numbers have 
not been shifted to symbols. If you wish to type in a shifted symbol while 
[CAPS LOCK] is in operation, simply hold down the [SHIFT] key before pressing a 
number key. Type in the following while holding down the [SHIFT] key: 
abcdef123456 
On the screen you will see: 


ABCEDF!"#$%& 


If you wish to return to small (lower case) characters again, press the [CAPS LOCK] 
key once again. 
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If you wish to type in capital letters and shifted upper case symbols without having to 
constantly hold down the [SHIFT] key, this can be carried out as follows: 


Holding down the [CTRL] key, then press the [CAPS LOCK] key once. This performs 
the function ofa ‘SHIFT LOCK’. Now type in: 


abcdef123456 
Onthe screen you will see: 
ABCDEF !"#$X8 


Note that it is still possible to type in numbers while [CTRL] and [CAPS LOCK] are in 
operation, by using the number keys to the right of the main keyboard. 


Holding down the [CTRL] key and pressing [CAPS LOCK] once, will return you tothe 
mode that you were previously in, (i.e. either lower case or capital letters-only). Ifyou 
have returned to the capital letters-only mode, simply press [CAPS LOCK] once again 
to return to the lower case mode. 


[CLR] 
This key is used to clear a character within the cursor. 


‘Type in ABCDE FGH. The cursor will be positioned to the right of the last letter typed 
(H). Now press the cursor left key 0 four times. The cursor will have moved four 
places to the left, and will be superimposed over the top of the letter E. 


Notice how the letter Е is still visible within the cursor. Press the [CLR] key once and 
you will see that the letter E has been cleared and the letters F GH have each moved 
one space to the left with the letter F now appearing within the cursor. Now press the 
[CLR] key again and hold it down. You will see how the letter F is cleared followed by 
the letters 6 and Н. 


[ESC] 


This key is used to [ESC]ape from a function that the computer is in the process of 
carrying out. Pressing the [ESC] key once will cause the computer to temporarily 
pause in its function, and will continue again if any other key is pressed. 


Pressing the [ESC] key twice will cause the computer to completely [ESC]ape from 
the function which it is carrying out. The computer is then ready for you to type in 
some more instructions. 
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Important 


When you reach the right hand edge of the screen by entering 40 characters оп a line, 
the next character will automatically appear on the following line at the left edge of 
the screen. This means that you should NOT press [ENTER] as those of you 
accustomed to typewriters might press a carriage return towards the right edge of a 
page. 


The computer does this automatically for you, and will react to an unwanted [ENTER] 
by printing an error message - usually a Syntax error, either there and then, ог 
when the program is run. 


Syntax Error 


Ifthe message: Syntax error appears on the screen, the computer is telling you 
that it does not understand an instruction that you have entered. 


For example type in: 
printt[ENTER] 

Onthescreen you will see the message: 
Syntax error 


The message appears because the computer has not understood the instruction: 
printt 


If youtypea mistake in the line ofa program, such as: 
10 printt "abc" [ENTER] 


The Syntax error message will not appear until the instruction is processed by 
thecomputer when the program is run. 
‘Type in: 

run [ENTER] 


(This command tells the computer to carry out the program that you have just typed 
intothe memory.) 
Onthescreen you willsee: 


Syntax error in 10 
10 [rintt "abc" 
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---------------------------------- 


This message tells you in which line the error has occurred, and displays the program 
line, together with the editing cursor so that you can correct the mistake. 


Press the cursor-right key ó until the cursor is over the t in print t. Now press ће 
[CLR] key to remove the unwanted t , then press the [ENTER] key to enter the 
corrected line into the computer. 


Now typein: 
run [ENTER] 

...and you will see that the computer has accepted the instruction, and has printed: 
abc 


Finally, check that you have observed the following warnings given at the beginning 
of this manual, in the section entitled IMPORTANT: 


INSTALLATION NOTES 4,5 
OPERATION NOTE 1 
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AMSTRAD СРС664 FOUNDATION COURSE 


Part 5: Loading Software and 
games.... 


Welcome to those of you who skipped here from the previous section! 


Asa quick demonstration of the speed of loading disc software, switch on the system, 
then insert the master CP/M disc supplied, into the drive with Side 1 uppermost. 


Type in: 
run "rointime.dem" [ENTER] 


After a few seconds the program will have loaded into the memory. Answer the 
question on the screen as to whether you are using a green monitor; (Type Y for Yes, 
or N for No), and you will then see a continuous demonstration of the game ‘Roland in 
Time’ on the screen. It may even persuade you to go out and buy a copy of the game! 


When you have finished watching the demonstration, you may ‘escape’ from the 
program by simultaneously holding down the [CTRL] and [SHIFT] keys then pressing 
the [ESC] key. This has the effect of completely resetting the computer, and may be 
used whenever you wish to start afresh, (You do not need to remove any disc from the 
drive when resetting the computer in this way) 


If the program hasn’t loaded, study any error message on the screen to see where you 
went wrong: 


Drive A: disc missing 
Retry, Ignore or Cancel? 


,means that you have either not inserted your disc correctly, or, if you have a 
2-drive system, that you have inserted it into Drive B. 


ROINTIME.DEM not found 


....means that you have either inserted the wrong disc, (ог the wrong side of the disc), 
or you have not carefully and precisely typed in the name, ROINTIME. DEM 


Bad command 


„means that you have probably mis-typed ROINTIME.DEM by introducing an 
unwanted spaceor punctuation mark. 
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Туре mismatch 
....means that you have omitted the quotation marks " 
Syntax error 


eans that you mistyped the word run 


Drive A: read fail 
Retry, Ignore or Cancel? 


...means that the computer has failed to read data from your disc. Check that you 
have inserted the correct disc and press R to Retry. This message will appear if ever 
you corrupt your disc by switching the system on or off while the disc is in the drive. 


Once you have learned how to make back-up copies of discs, always do so for valuable 
programs, and especially for your master CP/M system disc. 


Loading AMSOFT software and the WELCOME 
program 


Having hopefully whetted your appetite for the lighter side of computing, let's load a 
game... 


Insert your software disc in the drive, and type in: 
run "disc" [ENTER] 


After a few seconds, your game will be loaded and ready to play. 


Try typing in: run "disc" with side 1 of your master CP/M system disc inserted 
into the drive, and you will see and hear the CPC664 continuous "Welcome' 
demonstration. 


When you have finished watching ‘Welcome’, reset the computer using the [CTRL] 
[SHIFT] and [ESC] keys. 


The above instruction (run "disc"; will load most of the AMSOFT range of disc 
software, but you may come across the odd occasion where you have to type in 
something else. In all cases however, the loading instructions will be found on the 
labelofthe software disc, which should always be carefully followed. 


Finally, check that you have observed the following warnings given at the beginning 
of this manual, in the section entitled IMPORTANT’: 


INSTALLATION NOTE6 
OPERATION NOTES 1,5,6 
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AMSTRAD CPC664 FOUNDATION COURSE 


Part 6: Let's Compute 


So far, we know what we must and mustn't do with the computer, and how to set it up 
and connect peripherals. We know what some ofthe keyson the computer do, and how 
to load software, Now we'll look at some of the instructions that you can type in to the 
computer to make things happen... 


Like you or I, the computer can only understand instructions in a language that it 
knows, and that language is called BASIC, (short for Beginners' All-purpose 
Symbolic Instruction Code). The words in BASIC's vocabulary are called ‘keywords’ 
and each of them tell the computer to perform a specific function. All languages must 
conform to the rules of grammar, and BASIC is no exception. Here, grammar is 
referred to as ‘Syntax’, and the computer will always be kind enough to tell you if 
you've madea Syntax error! 


An introduction to AMSTRAD BASIC keywords 


In the chapter entitled ‘Complete list of AMSTRAD CPC664 BASIC keywords’, you 
will find a description of the keywords found in AMSTRAD BASIC. We will introduce 
some of the more commonly used BASIC keywords in this section. 


CLS 
Toclear the screen, type in: 
cls [ENTER] 


You will notice that the screen clears and the word Ready with the cursor B will 
appear at the top left of the screen. 


Note that you can use upper case (CAPITAL) or lower case (small) letters to enter any 
BASIC keyword into the computer. 


PRINT 


This is used whenever you want characters, words or figures in a program to be 
printed. Type in the following instruction line: 


print “hello” [ENTER] 
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On the screen you will see: 
hello 


The quotation marks "" are used to tell the computer what should be printed. 
he L Lo appeared on the screen as soon as the [ENTER] key was pressed. Type in: 


cls [ENTER] 


....to clear the screen. 


RUN 


The previous example showed a single instruction line. However, as soon as the 
[ENTER] key was pressed, the instruction was carried out then forgotten. It is 
possible to store a series of instructions in the computer to be carried out in a specified 
order. This is achieved by writing a ‘program’. The sort of BASIC instructions that 
you write in a program are the same as just shown, but in front of each instruction 
line, а line number is typed in. If there is more than one line in the program, these line 
numbers tell the computer the order in which to carry out or ‘run’ the program. When 
[ENTER] is pressed the line is stored in the memory until the program is run. Now 
typein: 
10 print “heilo” [ENTER] 


Notice that when [ENTER] was pressed, he | Lo was NOT printed on the screen, but 
instead was entered into the computer’s memory as a one-line program. To carry out 
that program, the word r un must be used. Type in: 


run [ENTER] 


You willnowsee hello printed onthe screen. 
Note that instead of continually typing in: print, you can use the ? question-mark 
symbol, for example: 


10 2 "hello" [ENTER] 


LIST 


After a program has been stored in the memory, it is possible to check what has been 
typed in by ‘listing’ the program. Type in: 

List [ENTER] 
Оп the screen you will see: 

10 PRINT “heilo” 


... Which is the program stored in the memory. 
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Notice how the word PRINT is now іп capitals. This means that the computer has 
accepted PRINT asa known BASIC keyword. 


Туре in: c Ls [ENTER] to clear the screen. Note that although the screen is cleared 
when you type іп: c Ls [ENTER], your program is not erased from the computer's 
memory. 


GOTO 


Тһе GOTO keyword tells the computer to go from one line to another in order to either 
miss out a number of lines or to form a loop. Type in: 


10 print "hello" [ENTER] 
20 goto 10 [ENTER] 


Nowtype: 
run [ENTER] 


чапа you will see he L Lo printed continuously on the screen, one under another on 
the left side. The reason for this, is that line 20 ofthe program is telling the computer 
to go to line 10 and carry on processing the program from there. 


To pause the running of this program, press [ESC] once. To start it again, press any 
other key. To stop it running so that other instructions can be typed in, press [ESC] 
twice. 


Now typein: 
с15 [ENTER] 


sto clear the screen. 


To see the word he L Lo printed continuously on each line, one next to another filling 
the whole of the screen, type in the previous program but with a semi-colon ; after 
the quotation marks " 


Type in: 


10 print "hello"; [ENTER] 
20 goto 10 [ENTER] 
run [ENTER] 


Note that the semicolon ; tells the computer to print the next group of characters 
immediately following the previous one, (unless the next group of characters is too 
large to fiton the same line). 
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Escape from this program by pressing [ESC] twice. Now type in line 1B again, but 
this time, use a comma , instead ofa semicolon ; 


10 print "hello", [ENTER] 
run [ENTER] 


You will now see that the comma , has told the computer to print the next group of 
characters 13 columns away from the first group of characters. This feature is useful 
for displaying information in separate columns. Note however, that if the number of 
characters in a group exceeds 12, the next group of characters will be displaced 
forwards by another 13 columns, so as to always maintain a space between columns. 


This figure of 13 columns is adjustable by use of the Z ONE command, described later 
inthis manual. 


Again, to escape from this program, press [ESC] twice. To clear the computer's 
memory completely, hold down the [CTRL] [SHIFT] and [ESC] keys in that order, and 
the computer will reset. 


INPUT 
“This command is used to let the computer know that it is expecting something to be 
typed in, for example, the answer to a question. 
Type the following: 
10 input "how oid are you";age [ENTER] 
28 print "you look younger than";age; 


"years old." [ENTER] 
run {ENTER} 


On the screen you will see: 

what is your age? 
Type in your age then [ENTER]. If your age was 18, the screen would then show: 

you look younger than 18 years old. 
This example shows the use of the input command and a number variable. The 
word age was put into the memory at the end of line 19 so that the computer would 
associate the wurd age with whatever numbers were typed in and would print these 


numbers where the word age ison line 20. Although we used the expression age in 
the above for the variable, we could have just as easily used a letter, for example b. 
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Reset the computer to clear the memory, ([CTRL] [SHIFT] and [ESC] keys). If you had 
wanted an input made up of any characters,(letters or letters and numbers), the 
dollar sign $ must be used at the end of the variable. This type of variable is called a 
‘string variable’. 

Туре in the following program: (Note that in line 20 you must put a space after the о 
in he L Lo and before the min my). 


10 input “what is your name";nameS [ENTER] 
20 print "hello ";name$;" my name is Roland" [ENTER] 
run [ENTER] 


On the screen you will see: 
What is your name? 


Type in your name then [ENTER] 
Ifthe name that you entered was Fred, you will see on the screen: 


Hello Fred my name is Roland 


Although we used name$ in the above example for the name string variable, we 
could have just as easily used a letter, for example a$. Now we will combine the 
above 2 examples into one program. 


Reset the computer by pressing [CTRL] [SHIFT] and [ESC]. Type in the following: 


5 cls [ENTER] 

10 input "what is your name";a$ [ENTER] 

20 input "what is your age";b [ENTER] 

30 print "I must say ";a$;" you dont 
look";b;"years old" [ENTER] 

run [ENTER] 


In this program we have used 2 variables, a$ for the name and b for the age. On the 
screen you will see: 


what is your name? 


Now type in your name (e.g. F red), then [ENTER]. 
You will then be asked: 


what is your age? 


Now typein your age (e.g. 18), then [ENTER]. 
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Ifyourname were Fred and your age 18, on the screen you will see: 


I must say Fred you dont look 18 years old 


Editing a Program 


If any of the lines іп the program had been typed incorrectly, resulting ina Syntax 
error orother error message, it would be possible to edit that line, rather than type 
it out again. To demonstrate this, let's type in the previous program incorrectly: 


5 clss [ENTER] 
10 input "what is you name";a$ [ENTER] 
20 input "what is your age";b [ENTER] 
30 print "I must say";a$;" you dont 
Look";b;"years old" [ENTER] 
Thereare3 mistakes in the above program: 


Inline 5 wetypedin c ($$ insteadof c ls. 
Inline 10 we typed in you instead of your. 
In line 30 we forgot to put a space between s a y and the quotation marks " 


There are 3 main methods of editing a program. The first is to simply type in the new 
line again. When a line is retyped and entered, it replaces the same numbered line 
currently in the memory. 


Secondly, there is the editing cursor method. 
Lastly, there is the copy cursor method. 


Editing Cursor Method 


Tocorrect the mistake in line 5 
Type: 
edit 5 [ENTER] 


Line 5 will then appear under line 30 with the cursor superimposed over the c in 
clss 


To edit out the extra s in clss, press the cursor right key 0 until the cursor 
appears over the last s, then press the [CLR] key. You will see the s disappear. 
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Now press [ENTER] and line 5 will now be corrected in the memory. Type in: 
List [ENTER] 


....to check line 5 is now correct. 


‘he AUTO command, described later in this manual, may be used to edit a number of 
successive lines in a similar manner to that described in the Editing Cursor Method. 


Copy Cursor Method 


The copy cursor is another cursor (in addition to the one already on the screen) which 
comes into view when you hold down [SHIFT] and press one of the cursor keys. It then 
detaches itself from the main cursor and can then be moved around the screen 
independently. 


To correct the mistakes in line 10 and 30, hold down the [SHIFT] key then press the 
cursor up key <> until the copy cursor is positioned over the very beginning of line 
1fl. You will notice the main cursor has not moved, so there are now two cursors on the 
screen. Now press the [COPY] key until the copy cursor is positioned over the space 
between y ou and name. You will notice that line 1 is being re-written on the last 
line and the main cursor stops at the same place as the copy cursor. Now type in the 
letter г. This will appear on the bottom line only. 


The main cursor has moved but the copy cursor stayed where it was. Now press the 
[COPY] key until the whole of line 10 is copied. Press [ENTER] and this new line 10 
will be stored in the memory. The copy cursor disappears and the main cursor 
positions itself under the new line 10. To correct the second mistake, hold'down 
{SHIFT] and press the cursor up key < until the copy cursor appears over the 

very beginning of line 30. 

Press [COPY] until the copy cursor is positioned over the quotation marks next to 
say. Now press the space bar once. A space will be inserted оп the bottom line. Hold 
down the [COPY] key until the whole of line 30 is copied, then press [ENTER]. 


You can now list the program to check that it is corrected in the memory by typing in: 
List [ENTER] 


NOTE: To move the cursor quickly (during editing) to the left or right hand end ofa 
line, hold down the [CTRL] key then press the left дог right ó cursor key once. 


Now reset the computer by pressing [CTRL] [SHIFT] and [ESC] keys. 


IF 


The 1 F and THEN commands ask the computer to test for a specified condition, then 
take action depending upon the result of that test. For example, in the instruction: 
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if 1+1=2 then print "correct" [ENTER] 


the computer will test for the specified condition, and then take action accordingly. 


The keyword ELSE can be used to inform the IF THEN command as to what 
alternative action the computer should take if the tested condition is false, for 
example: 


if 1+1=0 then print "correct" else print "wrong" [ENTER] 
We will now extend the previous program with the use ofthe i f and t hen comands. 


Type in the following: Notice that we have added two symbols. < means less than, and 
isnext to the M key. > means greater than,and is next to the < (less than) key. 


5 cls [ENTER] 

10 input "what is your name";a$ [ENTER] 

20 input “what is your age";age [ENTER] 

30 if age « 13 then 68 [ENTER] 

40 if age < 28 then 70 [ENTER] 

50 if age > 19 then 80 [ENTER] 

68 print "So "; you are not quite а 
teenager at";age;"years old":end [ENTER] 

70 print "So ";a$;", you are a teenager 
at";age;"years old":end [ENTER] 

80 print "Oh well ";a$;", you are no 
longer a teenager at";age;"years old" [ENTER] 


Tocheck this program is correct, type: 
list [ENTER] 
Nowtypein: 
run [ENTER] 
Now answer the questions prompted by the computer and see what happens. 
You can now see what effect the IF and THEN commands have in a program. We 
have also added the word END at the end of lines 60 and 70. The keyword END is 


used literally to end the running of a program. If END wasn't there in line 60, the 
program would continue to run, and carry out lines 7 В and 80. 
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Likewise, if END wasn't there in line 70, the program would continue to run, and 
carry out line 80. The colon : before the word END separates it from the previous 
instruction. Colons : can be used to separate two or more instructions on one 
program line. We have also added line 5 to clear the screen at the start of the 
program. We will do this from now on in the following programs to make things look 
neater. 


Resetthe computer by pressing [CTRL] [SHIFT] and [ESC] keys. 


FOR ana NEXT 


The FOR and NEXT commands are used when you want to carry out a specified 
operation a number of times. The instructions for the specified operation must be 
enclosedbythe FOR NEXT loop. 


Type in: 


5 cls [ENTER] 
10 for а=1 to 10 [ENTER] 

20 print "operation number";a [ENTER] 
30 next a [ENTER] 

run [ENTER] 


You will see that the operation in line 20 has been carried out 10 times, as instructed 
by the FOR command in line 10. Note also that the value of the variable а is 
increased by 1 each time. 


The keyword 5 ТЕР may be used to inform the FOR NEXT command how much the 
variable should be ‘stepped’ per operation. For example, change line 10 to: 


10 for a=1@ to 58 step 5 [ENTER] 
run [ENTER] 


Negative steps may also be used, for example: 


10 for а=100 to 0 step -10 [ENTER] 
run [ENTER] 


REM 


REM is short for R E Mark. The instruction tells the computer to ignore anything that 
follows it on the line. Hence you can use REMarks to inform you of, for example, the 
titleofa program, or the use ofa variable, as follows: 


10 REM Zap the invaders [ENTER] 
20 1-5 :REM number of lives [ENTER] 
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The single quote mark ' (which can Бе typed by holding down [SHIFT] and pressing 
the7 key) can be used asa substitute for : REM. For example: 


10 “Тар the invaders ] 
20 1-5 'number of lives [ENTER] 


GOSUB 


If there are a set of instructions within a program which are to be carried out a 
number of times, these instructions need not be typed in repeatedly every time they 
are needed in the program; instead, they can be made into a ‘sub-routine’ which when. 
required, can be called into action by the command GOSUB followed by the line 
number. The end of the GOSUB-routine is marked by typing in the instruction 
RETURN. Atthis point the computer will return to the instruction that immediately 
followed the GO S UB command which it had just obeyed. 


(The following two programs will not actually 'do' anything other than print words on 
the screen, and you therefore need not bother typing them in. They have been 
included to demonstrate the way that sub-routines can perform repeated tasks.) 


Forexample, in the following program: 


10 MODE 2 [ENTER] 

20 PRINT "This old man he played one" [ENTER] 

30 PRINT "He played knick-knack on my drum" [ENTER] 
40 PRINT "With a knick-knack paddy маск" [ENTER] 
50 PRINT "Give a dog a bone" 

60 PRINT "This old man came rolling home" [ENTER] 
70 PRINT [ENTER] 

80 PRINT "This old man he played two" [ENTER] 

90 PRINT "He played knick-knack on my shoe" [ENTER] 
100 PRINT "With a knick-knack paddy wack" [ENTER] 
110 PRINT "Give a dog a bone" [ENTER] 

120 PRINT "This old man came rolling home" [ENTER] 
130 PRINT [ENTER] 

140 PRINT "This old man he played three" [ENTER] 
150 PRINT "He played knick-knack on my knee" [ENTER] 
180 PRINT "With a knick-knack paddy маск" [ENTER] 
190 PRINT "Give a dog a bone" 

208 PRINT "This old man came rolling home" [ENTER] 
210 PRINT [ENTER] 

run [ENTER] 
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...you can see а number of lines which have to be repeated at various points in the 
program, for example the chorus at line 180. Let's make that chorus into а 
sub-routine and add the instruction RETURN at the end. Then, we'll call the 
sub-routine using the command GOSUB 188 whenever we want to use it. The 
program now looks like this: 


10 MODE 2 [ENTER] 

20 PRINT "This old man he played оле" [ENTER] 

30 PRINT "He played knick-knack on my drum" [ENTER] 
46 GOSUB 180 (ЕМТЕН) 

80 PRINT "This old man he played two" [ENTER] 

90 PRINT "He played knick-knack on my shoe" [ENTER] 
100 GOSUB 180 [ENTER] 

140 PRINT "This old man he played three" [ENTER] 
150 PRINT "He played knick-knack on my knee" [ENTER] 
160 GOSUB 180 (ENTER) 

170 END [ENTER] 

180 PRINT "With a knick-knack paddy wack" [ENTER] 
190 PRINT "Give a dog a bone" 

200 PRINT "This old man came rolling home" [ENTER] 
210 PRINT [ENTER] 

220 RETURN [ENTER] 

run [ENTER] 


See how much tedious typing we'd have saved ourselves? Well designed sub-routines 
are a principal part of computing. They lead to ‘structured’ programs, and develop 
good programming habits. 


Always bear in mind when writing sub-routines, that you do not necessarily have to 
‘jump into’ the sub-routine at the same point, i.e. its beginning. А sub-routine written 
from lines 500 to 800 can be called by: GOSUB 500, or 60508 640, or GOSUB 
799. 


Note in the above program, that the instruction END is used in line 170. Otherwise 
the program would naturally continue after line 160, and would carry out line 180, 
which is NOT required unlesscalled by GOSUB. 
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Simple Arithmetic 


Your computer can be used asa calculator quite easily. 


To understand this, carry out the following examples. We will use the ? symbol ` 
instead of typing pr int in this section. The answer will be printed as soon as the 


[ENTER] key is pressed. 
Addition 
(use [SHIFT] and ; keys for plus) 
Type: 
?3*3 [ENTER] 
6 


(Note that you do NOT type in the equals sign =) 
Type: 
28+4 [ENTER] 
12 

Subtraction 
(use unshifted 7 key for minus) 
Type: 

24-3 [ENTER] 

1 


Type: 
?8-4 [ENTER] 
4 


Multiplication 

(Use [SHIFT] and : keys for multiply (* means x) 

Type: 

23*3 [ENTER] 
9 
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Division 
(use unshifted ? key for divide ( / means +} 
Туре: 
23/3 [ENTER] 
Type: ! 
8 /4 [ENTER] 


Integer Division 
(use \ for division with removal ofthe remainder) 
Type: 

2 1 016 [ENTER] 


Type: 
220\3 [ENTER] 
6 


Modulus 
(use MOD toobtain the remainder portion after integer division) 
‘Type: 
218 мор 4 
2 


Type: 
29 MOD 3 
@ 


Square Root 


To find the square root of a number, use sqr ( ). The number that you want the 
square root of should be typed inside the brackets. 


Type: 
?sqr(16) [ENTER] (this means V16) 
4 
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Туре: 


?sqr (100) [ENTER] 
18 


Exponentiation 


(use unshifted £ key for exponentiation) 


Exponentiation is when a number is raised to a power of another. For example 3 
squared (35,3 cubed (3%) etc. 


Type: 


2313 [ENTER] (this means 3°) 
27 


Type: 


?814 [ENTER] (this means 87) 
4096 


Cube Root 


You can quite easily calculate cube roots by using a similar method to the last 
example. 


To find the cube root of 27 (1/27) 
Type: 
?271(1/3) [ENTER] 
3 
To find the cube root of 125 


Type: 
21251 (1/3) [ENTER] 
5 
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Se 
Mixed Calculations 
(+,-,*,/) 


Mixed calculations аге understood by the computer, but they are calculated within 
certain priorities. 


First priority is given to multiplication and division, then addition and subtraction. 
These priorities apply only to calculations containing only these four operations. 


Ifthecalculation was: 
3+7-2*7/4 
You may think this would be calculated as: 
3%7-2 *7 /4 
= Box? /4 
= 56/4 
= 18 
In fact it is calculated as: 
357-2*7/4 


=3+7-14/4 
а3%7-3.5 


Prove this by typing їп this calculation as it is written: 


Type: 


23%7-2%7/4 [ENTER] 
6.5 


You can change the way the computer calculated this by adding brackets. The 


computer will deal with the calculation inside brackets prior to the multiplication 
etc, outside the brackets. Prove this by typing in the calculation including brackets. 


Type: 


2(3+7-2)%7/4 [ENTER] 
14 
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Тһе priority of ALL mathematical operators їз as follows: 


Т Exponentiation 
MOD Modulus 
- Unary minus (declares а numberasnegative) 
*and/ Multiplication and division 
Integer division 
*and- Addition and Subtraction 


Further Exponents 


If you want to use very large or very small numbers in calculations, it is sometimes 
useful to use scientific notation. The letter E is used for the exponent of numbers to 
the base 10. You may use either lower case е or upper case E. 


For example 300 is the same as 3x10". In scientific notation, this is ЗЕ2. Similarly, 
0.03 is the same as 3x10). In scientific notation this is 3E - 2. Try the following 
examples. 


You сап type іп: 


?30*10 [ENTER] 
300 


or you сап type: 


23Е1%1Е1 [ENTER] 
300 


23000*1000 [ENTER] ...ог... ?3E3*1E3 [ENTER] 
3000000 


?3000*0.001 [ENTER] ...ог... ?3E3*1E-3 [ENTER] 
3 
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AMSTRAD СРС664 FOUNDATION COURSE 


Part 7: Save И.... 


Now that you've exercised your fingers by typing in a few instructions, you'll 
probably want to know how to save a program from the computer onto disc, and how 
to load it back from disc into the computer. 


Even if you are familiar with cassette saving and loading, it is worth pointing out 
some important information which must be observed when dealing with disc 
program files. ? 


The 2 most apparent differences will be that firstly, a new blank disc cannot simply be 
taken out of its wrapper and recorded onto, as is the case with cassettes. А new disc 
must be first be ‘formatted’, and this process will be explained in a moment. 


The other point worth mentioning here, is the importance of correctly ‘naming’ disc 
files. Cassette filenames generally conform to very loose standards, varying greatly 
in length, being at times omitted. Not so with discs. Disc filenames must conform 
strictly to CP/M standards, and will be explained later in this section. 


Formatting discs for use 


Before writing any data onto a new blank disc, the disc itself must first be formatted. 
Formatting can be likened to building a series of shelves and dividers onto a disc prior 
to the storage of information on those shelves; in other words, laying down an 
organised framework around which data can be put in or taken out. 


Formatting divides the disc into 360 distinctly separate areas: 
Track 39 
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There are 40 tracks from the outside of the disc (Track 0), to the inside (Track 39), and 
the circumference of the disc is divided into 9 sectors. 


Each track in a sector can store up to 512 bytes of data; hence the total available space 
on each side ofa disc is 180Kbytes. 


FirstSteps Using the CP/M Disc 

То prepare a new blank disc for reading and writing yourown programs onto, you will 
need to format using the CP/M disc. 

Switch thesystem on, and insert the CP/M disc supplied, into the drive. 


If you are operating 2 disc drives, always insert the CP/M disc into the main disc drive 
within the computer (Drive A.) 


Type in: 
Герт [ENTER] 
(You will find the bar symbol | by holding down [SHIFT] and pressing the à key.) 


After a few seconds you will see the following message on the screen: 


CP/M 2.2 - Amstrad Consumer Electronics pic 
A» 


This is a ‘Sign on’ message indicating that the operating system is under the 
control of CP/M. 


The displayed А > on the screen is a prompt, (similar to Re аду during normal BASIC 
operation) indicating that the computer is awaiting your instructions. 


Once you are operating CP/M, you cannot enter BASIC commands into the computer, 
as these will not be understood. 


Ifforexample, you type in the BASIC command: 
с15 [ENTER] 

The Computer will return your entry, together with a question mark: 
CLS? 


indicating that it does not understand your command. 
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To briefly look at some ofthe CP/M commands, type in: 
dir [ENTER] 


On the screen you will see a directory of CP/M and utility COMmands, one of which is 
format.Typein: 


format [ENTER] 
On the screen you will see: 


Please insert disc to be formatted into drive A 
then press any key. 


Remove the CP/M disc and insert your new blank disc, then press any key (any grey 
key). Formatting will start, commencing at Track 0 and ending at track 39, after 
which you will be asked on the screen: 


Do you want to format another disc (Y/N): 
If you wish to format the other side of your blank disc, or format another disc, type Y 
(for Yes) and you will receive the initia] message once again. 
The formatting process can be repeated any number of times until you answer the 
repeat question N (for No), whereupon the system will ask you to: 


Please insert a CP/M system disc into drive A 
then press any key: 


After doing so, the computer will return you to the direct CP/M mode, and will await 
your next command. Other CP/M commands will be dealt with later in this manual 
but for now, having learnt to format with CP/M, reset the computer using [CTRL] 
[SHIFT] [ESC]. 

Always keep a master copy of your CP/M disc in a safe place, as it is literally the key to 
your system. Later in this manual, you will be shown how to make a *working copy' of 
your CP/M disc, so that you can keep your master copy safely locked away! 


BEWARE 
FORMATTING A PREVIOUSLY RECORDED DISC WILL ERASE ITS CONTENTS. 


You will not be able to format a disc which has its write protection hole open. 
Attempting to do so will result in the message on the screen: 


Drive A: disc is write protected 
Retry, Ignore or Cancel? 
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Press C to cancel, then follow the instructions on the screen. The format mode will 
then be abandoned. 


Now that we have a formatted blank disc (or two), we can start to manipulate BASIC 
programs to and from disc. 


Saving a Program in Memory onto Disc 


Having typed a program into the computer's memory, save it onto disc by typing in: 
save "filename" [ENTER] 


Note that the naming ofthe program is obligatory. 


A filename on disc consists of 2 parts (fields). The first part is obligatory and can 
contain up to 8 characters. Letters and numbers may be used but NO spaces or 
punctuation marks. This first field usually contains the name of the program. 


The second field is optional. You can use up to 3 characters, but again no spaces or 
punctuation. The 2 fields are separated by a dot... 


If you do not specify a second field, the system will automatically label it with a token 
ofitsown, such as . BAS for BASIC filesor . BIN forbinary (machine code) files. 


As an example of saving to disc, write a short program into the memory, insert a 
formatted disc, then type in: 


save "example" [ENTER] 
After a few seconds, the prompt Ready will appear on the screen, and the program 
will have been saved onto disc. (If not, check any error message on the screen to 


establish whether you either forgot to insert your disc into the correct drive, forgot to 
close the write protect hole, or mistyped the command.) 


Catalog 

After saving the above program, type in: 
cat [ENTER] 

On the screen you will see: 


Drive A: user Ø 
EXAMPLE.BAS 1K 
168K free 
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Тһе filename will be displayed, including any specified or token second field, together 
with the file length (tothe nearest higher Kbyte). The amount of free space on the disc 
will also be displayed. 


Loading from Disc 


Programs may be loaded from disc then run, using the commands: 


load "filename" [ENTER] 
run [ENTER] 


...or they may be run directly using the command: 
run "filename" [ENTER] 


Note that protected programs may be run directly only. 


| Aand |B 


If you are operating an additional disc drive, you may specify which Drive (A or B) 
that you require a function to be performed on by typing in: 


la [ENTER] 


Ib [ENTER] 


г before issuing the SAVE, САТ, ог LOAD commands. 


Copying Programs from Disc to Disc 


Using the commands already learnt in this section, it can be seen that disc to disc 
program copying is performed simply by loading the program into the memory from 
the original (source) disc, removing the source disc, and saving the program onto the 
new (destination) disc. 


To save a program from disc to disc using 2 disc drives, you may prefer to insert your 
source disc into, for example, Drive В, and your destination disc into Drive А. To copy 
a program in this way, type in: 


Chapter 1 Page 42 Foundation Course 


Ib [ENTER] 
load "filename" [ENTER] 
la [ENTER] 
save "filename" [ENTER] 


There are four ways in which files may be SAVEd by the CPC664. In addition to 
ordinary BASIC file saving, by: 


save "filename" [ENTER] 
....there are three alternative methods, for more specialised purposes. . 

save "filename",a [ENTER] 
Adding the suffix , a instructs the computer to save the program or data in the form 
of an ASCII text file. This method of saving data applies to files created by 
wordprocessors and other applications programs, and its use will be further discussed 
asapplications are encountered. 


save "filename",p [ENTER] 


Adding the suffix , p tells the computer to protect the data so that the program 
cannot be LIS Ted after LOA Ding it, or RUNning it then stopping its execution using 
the [ESC] key function. 


Programs saved in this way can only be run directly, using the commands: 
run "filename" [ENTER] 

„ж... 
chain "filename" [ENTER] 


If you anticipate wanting to edit or alter the program, you should also keep a copy for 
yourself in unprotected form, i.e. without the „р suffix. 


save "filename",b, -starting address. , ‘length in bytes. 
{,-optional entry point] [ENTER] 


This option allows you to perform a binary save where a complete block of data in the 
computer's RAM is stored onto disc exactly as it occurs in the memory. It is necessary 
to instruct the computer where the section of memory you need to save starts, how 
long it is, and if required, the memory address at which to start execution should the 
fileberun asa program. 
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This binary save feature allows data from the screen memory to be stored directly 
onto disc in the form ofa screen dump. The contents ofthe screen will be saved exactly 
asitisseen, using the command: 


save "scrndump",b,49152,16384 [ENTER] 
...where 49152 is the starting address of the screen memory, and 16384 is the 
length ofthe screen memory that you wish to save. 
Tocallitback ontothe screen, type in: 

load "scrndump" [ENTER] 
More information on using the system to manipulate program files between discs 
(and cassette), will be found later in this manual. 


Finally, check that you have observed the following warnings given at the beginning 
ofthis manual, in the section entitled IMPORTANT’: 


INSTALLATION NOTES5,6,7 
OPERATION NOTES 1,2,3,4,5,6,7,9 
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AMSTRAD СРС664 FOUNDATION COURSE 


Part 8: Understanding Modes, 
Colours and Graphics. 


Тһе Amstrad CPC664 Colour Personal Computer has three modes of screen display 
operation: Mode 0, Mode 1, and Mode 2. 


When the computer is first switched оп, 


is automatically in Mode 1. 


To understand the different modes, switch on the computer and press the number 1 
key. Hold it down until two lines are full of 1's. If you now count the number of 1'son a 
line, you will see that there are 40. This means that іп Mode 1, there are 40 columns. 
Press [ENTER] - you willgeta Syntax error message, but don't worry, this is just. 
а quick way of getting back to the Ready message that tells you the computer is 
waiting for your next instruction. 


Now type in: 

mode @ [ENTER] 
You will see that the characters on the screen are now larger. Press the number 1 key 
again and hold it down until two lines are full of 17. If you count the number of 1's on 


a line, you will see there are 20. This means that in Mode 0, there are 20 columns. 
Press [ENTER] again. 


Now type in: 
mode 2 [ENTER] 


You will see that this is the smallest mode, and if you again type in a line of 17, you 
will count 80. This means that in Mode 2 there are 80 columns. 


Torecap: 
Mode 0 = 20 columns 
Mode 1 = 40 columns 
Mode 2 = 80 columns 


Finally, press [ENTER] once again. 
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Colours 


There is a choice of 27 colours. These are shown on a green monitor (GT65) as various 
shades of green. If you purchased the GT65 monitor, you can buy the AMSTRAD MP2 
Modulator/Power supply in order to use the computer's colour facilities on your 
domestic colour Т.У. 


In Mode 0, up to 16 of the 27 available colours can be put onto the screen at any time. 
In Mode 1, up to 4 of the 27 colours can be put onto the screen at any time. 

In Mode 2, up to 2 of the 27 colours can be put onto the screen at any time. 

You are able to change the colour of the BORDER, the PAPER (the area where the 
characters can appear) or the PEN (the character itself), all independently of each 
other. 

Тһе 27 colours available are listed in Table 1, each with their INK colour reference 
number. 

For convenience, this table also appears on the panel at the top right hand side of the 
computer. 


MASTER COLOUR CHART 
Ink Ink Ink 
No. Colour/Ink No.  Colour/Ink No.  Colour/Ink 
0 Black 9 Green 18 Bright Green 
1 Blue 10 Суап 19 SeaGreen 
2 Bright Blue n Sky Blue 20 Bright Cyan 
8 Red 12 Yellow 21 LimeGreen 
4 Magenta 13 White 22 PastelGreen 
5 Mauve 14 Pastel Blue 23 Pastel Cyan 
6 Bright Red 15 Orange 24 Bright Yellow 
T Purple 16 Pink 25 Pastel Yellow 
8 Bright Magenta 17 Pastel Magenta 26 Bright White 


Table 1: The INK numbers and colours 


Asexplained earlier, when the computer is first switched on, it is in Mode 1. To return 
to Mode 1 from a different mode, type in: 


mode 1 [ENTER] 
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Thescreen display 


РЕМ 


BORDER 
PAPER 


The BORDER isthe area surrounding the PAPER. (Note that when the computer is 
first switched on, the BORDER and PAPER are both blue). The characters on the 
screen can only appear inside the border. The PAPER is the background area behind 
acharacter, whilethe PEN writes the character itself. 


Now we will explain how the colours that you see on the screen are selected, and how 
you can change these to your own choice. 


When you first switch on, or reset the computer, the BORDER is always set to colour 
number 1. Look up number 1 on the master colour chart, and you will see that colour 
number 1 is blue. The colour of the border can be changed by using the command: 
BORDER followed by the colour number. To change the border to white, type in: 


border 13 [ENTER] 


Sofar, so good. Now for the tricky bit. 


When you first switch on, or reset the computer. PAPER number Й. and PEN number 
1 are always automatically selected. This does NOT mean that you look up numbers 
тапа 1 on the master colour chart and away you ро.... 


The important thing to remember is that Ø and 1 are PAPER and PEN numbers: 
they are NOT ink colour numbers. To understand this, imagine having 4 pens on your 
desk numbered 0,1,2, and 3, and being able to fill each of these pens with any colour of 
your choice out of 27 bottles of ink, numbered 0 to 26. It can be seen therefore, that pen 
number 1 is not necessarily always the same colour; as it can be filled with a different. 
ink, in fact you could fill each of the 4 pens with the same ink. 
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So it is with the computer. Using the РЕМ and INK commands, you can select the pen 
number, and then the ink colour for that pen. 


Remembering that we are operating in Mode 1 (40 columns), look at Table 2 below, 
and you will see from the first and third columns, that P EN number 1 corresponds to 
INK colour number 24. Now look up INK number 24 on the master colour chart 
(Table 1) and you will see that the colour listed is bright yellow, i.e. the colour of the 
characters on the screen when you first switch on. 


DEFAULT SETTINGS 
Ink Colour Ink Colour Ink Colour 
Paper/PenNo. Мойе0 Mode1 Mode2 


22 24 
Flashing 1,24 20 
Flashing 16,11 6 


popkpRURUPRURUPRU 


Table2: PAPER/PEN/MODE/INK reference 
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The PAPER/PEN/INK relationships given in Table 2 are not fixed however. They аге 
the default settings when you switch-on or reset the computer. You can change them 
by using the INK command. The command has two parts (or ‘parameters’). The first 
part is the number of the PAPER or PEN that you are going to fill with ink, and the 
second part is the colour of the ink itself. The two parts of the command are separated 
byacomma , 


So, now that we know that we are using PEN number 1, let's change the colour of the 
INK in that pen, to orange. 


Type in: 
ink 1,15 [ENTER] 


...and you will see that the characters on the screen have changed colour. 


The background colour can also be changed using the INK command. We know that 
PAPER number @ is selected at switch on, so let's change the colour of the INK in 
PAPER number Ü to green (colour number 9) by typing in the command: 


ink 0,9 [ENTER] 
Now let's use a different pen altogether. Type in: 
pen 3 [ENTER] 


Notice how only the colour of the new characters (after the command) changes. 
You're using PEN number 3 now, and you will see from Tables 1 and 2 that the INK 
initially loaded into PEN number 3 is colour number 6 (bright red). Change it to pink 
by typing in: 


ink 3,16 [ENTER] 


Remember, 3 is the colour of the pen that you selected earlier with the command: 
pen 3,andthat 16 isthe ink colour- pink. 
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Now let's change to а new paper. When a new paper is selected, (һе previous 
background colour behind the characters will NOT change because that colour was 
‘printed’ by a different PAPER. Тозее this, type in: 

paper 2 (ENTER] 


Once again use Tables 1 and 2 to see why the background colour for PAPER number 
2 is bright cyan. Change it to black by typing in: 


ink 2,0 [ENTER] 
On the screen now, we have characters written by PEN numbers 1 and 3, on a 
background of PAPER numbers 0 and 2. INKs can be changed in a PEN or PAPER 
that you are not currently using. For example, type in: 


ink 1,2 [ENTER] 


^. Which changes the colour of all the previous characters typed in with PEN 
number 1. 


Type in: 
cls [ENTER] 


«to clear the screen. 


It should now be possible for you to instruct the computer to return to its original 
colours (blue border and background with bright yellow characters) using the 
BORDER, PAPER, PEN, and INK commands. See if you can do во. If you can’t, then 
reset the computer using the [CTRL] [SHIFT] and [ESC] keys. 


Flashing Colours 


It is possible to make the colour of the characters flash between one colour and 
another, This can be achieved by adding an extra colour number to the INK 
command of the PEN. 


To see the characters on the screen flashing between bright white and bright red, 
reset the computer using [CTRL] [SHIFT] [ESC], and type in: 


ink 1,26,6 [ENTER] 
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Tn this case, 1 is the PEN number, while 26 is the colour bright white, and 6 is the 
alternate colour, bright red. 


It is also possible to make the colour of the PAPER behind the characters flash 
between one colour and another. This сап be achieved by adding an extra colour 
number to the INK command forthe PAPER. 


To see the PAPER flashing between green and bright yellow behind the characters, 
type in: 

ink 0,9,24 [ENTER] 
In this case Й is the PAPER number, while 9 is the colour green, and 24 is the 
alternate colour bright yellow. 
Now reset the computer using [CTRL] [SHIFT] [ESC] 


Note from Table 2 that in mode 0, two of the PENs (numbers 14 and 15), together 
with two of the PAPE Rs (numbers 14 and 15) are default flashing colours, In other 
words, their INK commands have been pre-programmed with an extra colour 
parameter. 


‘Type in the following: 

mode Ø [ENTER] 

pen 15 [ENTER] 
on the screen you will see the word Re ad y flashing between sky blue and pink. 
Now type in: 


paper 14 [ENTER] 
cls [ENTER] 


You will now see that in addition to the word Ready flashing between sky blue and 
pink, thebackground PAPER is also flashing between yellow and blue. 


PEN and PAPER numbers 14 and 15 may be re-programmed using the INK 
command to other flashing colours, or to one steady colour 


Finally, it is possible to make the BORDER flash between two colours by adding an 
extra colour number to the BORD E R command. Type in: 
border 6,9 [ENTER] 


You will now see that the BORDER is flashing between bright red and green. Note 
that the border may be set to any one, or pair of the 27 colours, regardless of whether 
you are operating in mode 0, 1, or 2. 


Now reset the computer using [CTRL] [SHIFT] [ESC] 
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——————_————_—_—_—_—_—_—__________ 


For further demonstration оѓ the colours available, type іп the following program, 
thenrunit. 


10 MODE Ø [ENTER] 
20 гате-600: REM sets speed of program [ENTER] 
50 FOR b=@ TO 26 [ENTER] 

48 LOCATE 3,12 [ENTER] 

50 BORDER b [ENTER] 

60 PRINT "border colour";b [ENTER] 
70 FOR t-1 TO rate [ENTER] 

80 NEXT t,b [ENTER] 

90 cLG [ENTER] 

100 FOR р=й TO 15 [ENTER] 

110 PAPER p [ENTER] 

120 PRINT "paper";p [ENTER] 

130 FOR п-й TO 15 [ENTER] 

140 PEN n [E 

150 PRINT "pen";n [ENTER] 

160 NEXT n [ENTER] 

170 FOR t=1 TO rate*2 [ENTER] 

180 NEXT t,p [ENTER] 

190 MODE 1 [ENTER] 

200 BORDER 1 [ENTER] 

210 PAPER 0 [ENTER] 

220 PEN 1 [ENTER] 

230 INK 0,1 [ENTER] 

240 INK 1,24 [ENTER] 

run[ENTER] 


IMPORTANT 


In the above program, and in later chapters and listings in this manual, BASIC 
keywords will appear in upper case (CAPITAL) letters. This is how keywords 
appear when a program is LISTed by the computer. In general it is preferable 
that you type instructions or programs using lower case (small) letters, since it will 
help you spot typing mistakes when LISTing the program - (because the 
mis-typed BASIC keyword will NOT be converted to upper case). 


For the remainder of this Foundation course, we will list programs in both upper 
and lower case, so that you get accustomed to this aspect of operation. 


А variable's name, such as x or a$, will NOT be converted to upper case when the 
program is L I S Ted although the computer wil] recognise the name regardless of 
whether it appears in upper or lower case in the program. 


Attention 


From this point in the manual, you will not be instructed to press the [ENTER] key 
after each line. Therefore it is assumed that you will do it automatically. 
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Graphics 


Тһеге аге a number of character symbols in the computer's memory. To print апу опе 
ofthese, we use the keyword: 


chr$( ) 


Inside the brackets should be the symbol number, which is in the range from 32 to 


Reset the computer, [CTRL] [SHIFT] [ESC], then type in: 
print chr$(250) 


Don't forget to press [ENTER]. On the screen you will see character number 250, 
which isa man walkingto the right. 


To see all the characters and symbols appear on the screen together with their 
associated numbers, type in the following program, once again remembering to press 
[ENTER] after each line. 


18 for n=32 to 255 
20 print n;chr$(n); 
30 next n 

run 


For your reference, the range of characters together with their respective numbers 
appear in the chapter entitled ‘For your reference....’. 


LOCATE 


This command is used to reposition the character cursor to a specified part of the 
screen. Unless changed by the locate command, the character cursor starts at the top 
left corner of the screen, which corresponds to x,y co-ordinates 1,1 (x is the horizontal 
position and y is the vertical position). In mode 1 there are 40 columns and 25 lines. 
Therefore, to position a character in the centre ofthe top line in mode 1, we would use 
20,1 as the x,y co-ordinates. 


Tosee this, type in: (remember to [ENTER] each line) 
mode 1 ....зсгееп clears, cursor moves to top left. 
10 locate 20,1 


20 print chr$(25@) 
run 
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Just to prove that this is on the top line, type in: 
border 0 

The BORDER will now be black and you will see the man at the middle of the top line 

ofthe screen. 

In mode 0, there are only 20 columns, but the same 25 lines. If you now type in: 


mode в 
run 


„you will see that the man now appears at the top right corner of the screen. This 
happens because the x co-ordinate 20, is the last column in mode 0. 

In mode 2, there are 80 columns and 25 lines. Using the same program, you will 
probably be able to guess where the man will appear. Type in: 


mode 2 
run 


Return to mode 1 by typing in: 
mode 1 


Now experiment for yourself, modifying the Locate and chr$ ( ) numbers to 
position various characters anywhere on the screen. Just for example, type in: 


locate 20,12:print chr$(240) 
You will see ап arrow in the centre ofthe screen. Note that in this instruction: 


20 was the horizontal (x) co-ordinate (in the range 1 to 40) 
12 wasthe vertical (y) co-ordinate (in therange 1 to 25) 
240 wasthecharacter symbol number (іп the range 32 to 255) 


То get the character symbol 250 to be repeated across the screen, type in the following 
program: 


18 CLS 

20 FOR x=1 TO 39 
30 LOCATE x,20 

50 PRINT CHR$(250) 
60 NEXT x 

70 GOTO 10 


Press [ESC] key twiceto break. 
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In order to remove the previous character from the screen before printing the next. 
character, type in: 


50 print " ";chr$(250) 


(Thisnew line 50 automatically replaces the previously typed in line 50.) 
Now type in: 


run 


FRAME 


To improve the movement of the character across the screen, add the following line: 
40 frame 


The FRAME command synchronises the movement of objects on the screen to the 
display frame scanning frequency. If that's a bit technical for you, just remember that 
the command should be used whenever you want to move characters or graphics 
around the screen smoothly. 


"This program can be further enhanced to improve the movement by adding some 
delay loops and by using a different returning character symbol. 


Typein: 
list 


Now add the following lines to the program: 


78 FOR п=1 TO 300:NEXT n 
80 FOR x=39 TO 1 STEP -1 
90 LOCATE х,20 

100 FRAME 

110 PRINT CHR$(251);" " 
120 МЕХТ х 

138 FOR п=1 TO 300:NEXT n 
148 GOTO 20 

run 
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PLOT 


Unlike the LOCATE command, PLOT may be used to determine the position of the 
graphics cursor, using pixel co-ordinates. (A pixel is the smallest possible segment of 
the screen). 


Notethat the graphics cursor is not visible and is different from the character cursor. 


There are 640 horizontal pixels by 400 vertical pixels. The x,y co-ordinates are 
positioned with respect to the bottom left corner of the screen, which has x,y 
co-ordinates of 0,0. Unlike the LOCATE command used for characters, the 
co-ordinates do not differ between modes 0,1, or 2. $ 


Tosee this, first reset the computer using [CTRL] [SHIFT] [ESC], then type in: 
plot 520,200 


A small dot will appear in the centre of the screen. 
Now change the mode by typing in: 


mode Ø 
plot 320,200 


You will see the dot is still in the centre but is now larger. Change the mode again and 
type in the same command to see the effect in mode 2: 


mode 2 
plot 520,200 


The dotis still in the centre, but is now much smaller. 


Plot several dots over the screen in various modes, in order to accustom yourself with 
this command. When you have finished, return to mode 1 and clear the screen by 
typing in: 


mode 1 


DRAW 


First reset the computer using [CTRL] [SHIFT] [ESC]. Тһе DRAW command draws a 
line from the current graphics cursor position. To see this in more detail, draw a 
rectangle on the screen by using the following program. 


We start by repositioning the graphics cursor with a PLOT command, then DRAWing 
a line from the graphics cursor position, up towards the top left corner, then from 
there to the right corner etc, etc. Type in: 
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10 plot 10,10 
20 draw 10,590 
30 draw 650,390 
40 draw 630,10 
50 draw 10,10 
60 goto 60 


Press [ESC] twice to break from this program. 


(Notice line 60 of this program; the computer is told to ‘loop’ around line 60 again 
and again, until you 'break' from the program by pressing [ESC] twice. This sort of 
instruction is useful if you do not want the computer to automatically ‘break’ at the 
end ofa program and display the Re a dy prompt that usually appears on the screen.) 


Now add the following lines to the program, to draw a second rectangle inside the 
first. Type in: 


60 plot 20,20 
70 draw 20,380 
80 draw 620,380 
90 draw 620,20 
100 draw 20,20 
118 goto 110 
run 


Again, press [ESC] twice to break from this program. 


MOVE 


The MOVE command operates in a similar manner to PLOT, in that the graphics 
cursor is moved to the position specified by the x,y co-ordinates; however the pixel 
(dot) at the new graphics cursor location is NOT plotted. 


Typein: 

сіз 

move 639,599 
Although we can see по sign of it on the screen, we һауе moved the graphics cursor to 
the top right corner. 
Let's prove it by drawing a line from that position to the centre of the screen, by 
typingin: 


draw 320,200 
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Сіксіев 


Circles сап either Бе plotted ог drawn. One method of forming а circle is to plot the 
x,y, co-ordinates of each point on the circumference of a circle. Refer to the diagram 
below and you will see that point ‘p’ on the circumference can be plotted using x and y 
co-ordinates. These are: 


x7190*cos(a) 
y=190*sin(a) 


Plotting the points of a circle. 


In previous programs we have plotted points with respect to the bottom left corner of 
the screen. If we wanted to position a circle in the centre of the screen we would have 
to plot the centre of the circle at co-ordinates 320,200 then position all points of the 
circle relative to the centre position, by adding on the centre position co-ordinates. 


A program to plot a circle would then be like this. Type in: 


10 CLS 

20 DEG 

30 FOR a-1 TO 360 

40 MOVE 320,200 

50 DRAW 320*190*COS(a),200* 190 *SIN(a) 
60 NEXT 
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Note the use of the keyword NE W before typing іп the program above. This tells the 
computer to clear any program in the memory (іп a similar manner to [CTRL] [SHIFT] 
[ESC]). However the screen itself is not cleared. 


The radius of the circle can be reduced by lowering the 190 figure (190 refers to 
pixels). 


To see the effect of the circle being plotted differently (in radians), delete line 20 from 
the program by typing in: 


20 


То see a solid circle drawn by lines from the centre, edit line 50, replacing the word 
plot withtheword draw.(Line 50 will then be): 


50 draw 320*190*cos(a),200*190*sin(a) 


Try this with and without line 20 again. 


You will note that line 60 of this program is NEXT instead of NEXT a. It is 
permissible to simply type ‘NEX T’ on its own; the computer will work out which FOR 
expression the NEXT is to be associated with. In programs where there are numerous 
FOR and NEXT loops however, you may wish to add the variable's name after the 
word NEXT in order to identify the NEXT statement when studying the program. 


ORIGIN 


In the previous program we used the MOVE command to establish the centre of a 
circle, then added the x,y co-ordinates to this centre position. Instead of adding these 
centre co-ordinates to the point plotted, we can use the OR I G IN command. This will 
position each of the x,y co-ordinates relative to the OR IG IN. To see this type in: 


new 

10 cls 

20 for а=1 to 360 

30 origin 320,200 

40 plot 190*cos(a),190*sin(a) 
50 next 

run 
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Toplot four smaller circles оп the screen, type in the following program: 


new 

10 CLS 

20 FOR a-1 TO 360 

30 ORIGIN 196,282 

40 PLOT 50*COS(a),50*SIN(a) 
50 ORIGIN 442,282 

60 PLOT 58*COS(a),5Ü*SIN(a) 
70 ORIGIN 196,116 

88 PLOT 50*COS(a),50*SIN(a) 
90 ORIGIN 442,116 

188 PLOT 50*COS(a),50*SIN(a) 


110 NEXT 
run 


Toseea different way of creating a circle, type in the following program: 


10 MODE 1 

20 ORIGIN 320,200 

30 DEG 

40 MOVE 0,190 

50 FOR а-й TO 360 STEP 10 

60 DRAW 190*SINCa),19B*COS(a) 
70 NEXT 


‘This time a line is D RAWn from co-ordinate to co-ordinate around the circumference 
of the circle. Note how the circle is drawn much quicker than it is plotted. 


Once again observe the effect of removing the DEG command, by deleting line 30, 
then RUNning the program again. 


FILL 


Тһе F ILL command is used to fill an area of the screen which is enclosed by drawn or 
edge of screen/graphics window boundaries. 


Reset the computer, [CTRL] [SHIFT] [ESC], then type in: 


new 
10 cls 

20 move 20,28 
30 draw 620,20 
48 draw 310,380 
50 draw 20,20 
run 
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Оп the всгееп you will see а triangle. Move the graphics cursor to the centre of the 
screen by typing in: 


move 520,200 


Using the keyword FILL followed by a pen number, for example 3, we will now 
FILL the screen using the specified pen, from the current graphics cursor position 
(centre screen) to the drawn boundaries. Type in: 


fitt 3 

Now move the graphics cursor outside the triangle by typing in: 
move 0,0 

See what happens when you type in: 
fill 2 


The computer has used pen number 2 to F ILL the area bounded by the drawn lines 
and by the edges of the screen. 


Now alter the program by typing in the following lines, and see what happens: 


50 draw 50,50 
60 move 328,208 
70 fill 3 

run 


You will note that any gaps in the drawn boundaries let the ink from the pen ‘seep’ 
through! 


This point is further demonstrated by F I LLing first a plotted circle, then a drawn 
circle. Type in: 


new 

10 CLS 

20 FOR а-1 TO 360 

30 ORIGIN 520,200 

40 PLOT 190*C0S(a),190*SIN(a) 
50 NEXT 

60 МОУЕ -188,0 

70 FILL 3 

run 
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10 MODE 1 

20 ORIGIN 320,200 

38 DEG 

4B MOVE 0,190 

50 FOR 4-0 TO 368 STEP 10 

60 DRAW 190*SIN(d),190*COS(d) 
70 NEXT 

80 МОУЕ -188,0 

90 FILL 3 


We can make the outline of the circle to be filled invisible, by setting the pen ink to 
thesame colour as the paper ink. Add: 


45 GRAPHICS PEN 2:INK 2,1 
run 


The GRAPHICS PEN command selects the pen to be used for drawing graphics on 
the screen. The INK command then specifies the ink colour for that pen, which in this 
case, is the same as for the paper (i.e. colour number 1). 


Further details.... 


For a more comprehensive guide to graphics on the CPC664, see the section 
‘Graphically speaking’ in the chapter entitled ‘At your leisure....’. 


To conclude this section, here are a few graphics demonstration programs which 
incorporate a lot of the programming commands and keywords that you should now 
understand. Each of the programs draws continuous patterns on the screen. 


10 BORDER 0: СВАРНТС$ PEN 1 

20 m-CINT(RND*2):MODE m 

30 iT1-RND*26:i12-RND*26 

40 IF ABS(i1-i2)<10 THEN 50 

50 INK 0,11:ІМК 1,12 

60 s-RND*5*3:0RIGIN 520,-100 

78 FOR x= -1000 TO Ø STEP s 

80 MOVE Ø,Ø:DRAW x,300:DRAW 0,600 
90 MOVE Ø,Ø:DRAW -x,300:DRAW 0,600 
100 NEXT:FOR t-1 TO 2000:NEXT:GOTO 20 
run 
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10 MODE 1:BORDER Q:PAPER Ø 

20 GRAPHICS PEN 2:INK 0,0:i-14 

3B EVERY 2200 GOSUB 150 

40 flag-0:CLG 

50 INK 2,14*RND*12 

60 bX-RND*5«1 

70 cX=RND*S+1 

80 ORIGIN 520,200 

96 FOR а=й TO 1000 STEP Р1/30 

100 хх-100ж%С05 (а) 

110 MOVE xX,yX 

128 DRAW 200*COS(a/bX),200*SIN(a/cX) 
130 ІР flag=1 THEN 40 

140 NEXT 
150 flag- 


:RETURN 


10 MODE 1:BORDER Q:DEG 

20 PRINT "Please wait" 

30 FOR п=1 TO 5 

40 INK 0,0:INK 1,26:INK 2,6:INK 3,18 

50 IF п=1 THEN sa-120 

60 IF THEN sa=135 

70 IF THEN ѕа=150 

80 IF n=1 THEN ORIGIN 0,-50,0,640,0,400 ELSE ORIGIN 0,0 
,0,640,0,400 

90 DIM сх(5),су(5),г(5),(с(5) 

100 DIM np(5) 

110 DIM px%(5,81) ,py%(5,81) 

120 st=1:cx(1)=320:cy(1)=200:r(1)=80 

130 FOR st=1 TO 4 

140 r(st+1)=r(st)/2 


150 NEXT st 
160 FOR st=1 TO 5 
170 Uc(st)=0:np(st)=0 


188 np(st)=np(st)+1 
198 pxx(st,np(st))=r(st)*SINCic(st)) 
200 py%(st,np(st) =r(st)*coscic(st)) 
210 Llc(st)=lc(st)+360/r(st) 

220 IF lc(st) < 368 THEN 1 


This program continueson the next page 
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230 pxX(st,np(st)+1)=pxX(st,1) 

240 pyZ(st,np(st)+1)=pyX(st,1) 

250 NEXT st 

260 CLS:cj=REMAIN(1):cj=REMAIN(2) 

270 cj=REMAIN(3):INK 1,2:st-1 

280 GOSUB 350 

290 LOCATE 1,1 

300 EVERY 25,1 GOSUB 510 

318 EVERY 15,2 GOSUB 550 

320 EVERY 5,3 GOSUB 590 

330 ERASE cx,cy,r,lc,np,pxX,pyX:NEXT 

348 GOTO 340 

350 cxX-cxG t0 :cyX7cy(Gs t) :lc(Cst)-0 

360 FOR x%=1 TO np(st) 

370 MOVE схХ,суХ 

380 DRAW cxX*pxX(st,xJD,cyX*pyX(st,x4),1*(st MOD 3) 
390 DRAW cxZ*pxX(st,xX*1D,cyX*pyX(st,xX*10,1*(st MOD 3) 
400 NEXT x% 

410 IF st=5 THEN RETURN 

420 1с(51) =0 

830 cx(st+1 x(st)+1.5*r(st)*SIN(sa+Lc(st)) 
440 cy(st+1)=cy(st)+1.5*r(st)*COS(sa+Lc(st)) 
&50 st=st+1 

460 GOSUB 350 

470 st=st-1 

480 (c(sto-lc(st)*2*sa 

490 IF Cic(st) MOD 360)<>0 THEN 430 

500 RETURN 

510 ik(1)=1+RND*25 

520 IF ik(1)=ik(2) OR ik(1)=ik(3) THEN 510 
530 INK 1,ik(1) 

540 RETURN 

550 ik(2)-1*RND*25 

560 IF ik(2)=ik(1) OR ik(2)=ik(3) THEN 550 
570 INK 2,ik(2) 

580 RETURN 

590 ik(3)-1*RND*25 

600 IF ik(3)-2ikC1) OR ik(3)=ik(2) THEN 590 
610 INK 3,ikC3) 

620 RETURN 
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AMSTRAD CPC664 FOUNDATION COURSE 


Part 9: Using Sound. 


Sound is generated by a loudspeaker within the computer itself. If you are using an 
MP2 Modulator/Power supply and a domestic television, set the TV's volume control 
toaminimum. 


The level of sound can be adjusted by use of the VOLUME control on the right hand 
side of the computer. The sound can also be fed to the auxiliary input socket of your 
stereo system, using the socket on the computer marked STEREO. This will enable 
you to listen to the sound generated by the computer in stereo, through your hi-fi 
loudspeakers or headphones. Instructions on connecting to the computer’s STEREO 
socket will be found in part 2 of this Foundation course. 


The SOUND Command 


The SOUND command has 7 parts (‘parameters’). The first two of these must be used; 
the rest are optional. The command is typed in as: 


SOUND «channel status: , бопе period: , «duration: , «volume: , «volume envelope» , 
stone envelope» , noise period. 


It looks pretty complicated, but if we analyse each parameter, we can soon get to grips 
with it. Let's look at the parameters one by one.... 


ChannelStatus 


То keep things simple at the moment, regard the .channel status; as the reference 
number for the sound channel. There are 3 sound channels, and for now we will use 
the «channel status: number 1. 


Tone Period 


“Tone period: is a technical way of defining the pitch of the sound, or in other words, 
‘what note it is’ (i.e. do re mi fa so, etc). Each note has a set number, and this number is 
the «tone period-. Refer to the chapter entitled ‘For your reference....’, and you will see 
that the note middle c (do),has a tone period of 478. 
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ФЦ 
Now reset the computer [CTRL] [SHIFT] [ESC], and type in: 


18 sound 1,478 
run 


You will hear a short note which is middle c lasting 0.2 second. 


If you don’t hear anything, make sure that the VOLUME control on the computer is 
not set to zero, then type RUN again. 


Duration 


This parameter sets the length of the sound, in other words, ‘how long it lasts’. The 
parameter works in units of 0.01 (one hundredth) of a second, and if you don't specify 
the «duration», the computer will assume a figure of 20, which is why the note you 
just heard lasted 0.2 second, i.e. 0.01 multiplied by 20. 


To make the note last for 1 second, a «duration» of 100 would be be used; to make it 
last 2 seconds, 200 would be used. Type in: 


10 sound 1,478,200 
run 


You will hear the note middle c lasting 2 seconds. 


Volume 

This parameter specifies the starting volume of a note. The number is in the range 0 
to 15. A volume: figure of Ø is minimum, while 15 is maximum. If no number is 
used, 12 is assumed. Type in: 


18 sound 1,478,200,5 
run 


Notethe volume ofthis sound. Now type it in using a higher volume number: 


18 sound 1,478,200,15 
run 


You will hear that this is much louder. 


Chapter 1 Page 66 Foundation Course 


Volume Envelope 


To make the volume vary within the duration of the note, you can specify a volume 
envelope using the separate command ЕМУ. You can in fact make a number of 
different volume envelopes, and like the SOUND command, each has its own 
reference number. If you have created a volume envelope with a reference number of 
1, and you wish to use it in a SOUND command, then where the parameter volume 
envelope» is required, type in 1. Creating a volume envelope will be explained 
shortly. 


Tone Envelope 

To make the tone or pitch vary within the duration of the note, you can specify a tone 
envelope using the separate command ENT. You can in fact make a number of 
different tone envelopes, and like the SOUND command, each has its own reference 
number. If you have created a tone envelope with a reference number of 1, and you 
wish to use it in a SOUND command, then where the parameter «(опе envelope» is 
required, type in 1. Creating a tone envelope will be explained shortly. 


Noise 


- Noise» is the last parameter of the SOUND command. A range of noise is available by 
varying the noise: parameter between 1 and 31. Add a noise: parameter of 2 at the 
end of the SOUND command and listen to the effect. Then change the noise 
parameter to 27 and listen to the difference. Type in: 


10 sound 1,478,200,15,,,? 
Note the two ‘blank’ parameters ( , , ,) before the noise» parameter of 2. This i: 


because we haven't created a volume envelope» nor a «tone envelope». 


Creating a Volume Envelope 


The volume envelope command is ENV. In its simplest form, the command has « 
parameters: The command is typed in as: 


ЕМУ envelope number. , number of steps: , «size of'step: , «time per step: 


As before, let's look at the parameters one by one. 
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Envelope Number 


This is the reference number (between Й and 15) given to a particular volume 
envelope so that it can be called up in the SOUND command. 


Number of Steps 


This parameter specifies how many different steps of volume you want the sound to 
pass through before it ends. For example, in a note which lasts 10 seconds, you may 
wish to have 10 volume steps of 1 second each. In such a case, the «number of steps 
parameter used should be 10. Ç 


The available range of number of steps» is Ø to 127. 


SizeofStep 


Each step can vary in size from a volume level of Ø to 15 with respect to the previous 
step. The 16 different volume levels are the same as those you will hear in the SOUND 
command. However, the «size of step. parameter used can be between -128 and 
+127; the volume level re-cycling to Ø after each 15. 


Time per Step 


This parameter specifies the time between steps in 0.01 second (hundredths of a 
second) units. The range of «time per step» numbers is Ø to 255, which means that the 
longest time between steps is 2.56 seconds (B is treated as 256). 


Note therefore, that the number of steps parameter multiplied by the time per step» 
parameter shouldn't be greater than the «duration parameter in the SOUND 
command, otherwise the sound will finish before all the volume steps have been 
passed through. 


(In such acase, the remaining contents of the volume envelope are discarded.) 


Likewise, if the «duration: parameter in the SOUND command is longer than the 
«number of steps: multiplied by the «time per step», the sound will continue after all of 
the volume steps have been passed through, and will remain constant at the final 
level. 


Toexperiment with the volume envelope, type in the following program: 
10 env 1,10,1,100 


20 sound 1,284,1090,1,1 
run 


Chapter 1 Page 68 Foundation Course 


Line 20 specifies a SOUND with а tone period of 284 (international a), lasting for 10 
seconds with a start volume of 1, and using volume envelope number 1. conisting of 
10 steps, raising the volume of each step by 1, every 1 second (10 x 0.01 second). 


Change line 10 in each of the following ways and then run to hear the effect оГ 
changing the envelope: 


10 env 1,100,1,10 
10 env 1,100,2,18 
10 env 1,180,4,18 
10 env 1,58,20,28 
10 env 1,50,2,20 
18 env 1,50,15,5й 


And finally try this: 
18 env 1,50,2,10 


You will notice that half way through the sound, the level remains constant. This is 
because the number of steps was 5 0 and the time between cach step was 0.1 second. 
Therefore the length of time during which the volume varied was only 5 seconds, but 
the «duration: parameter in the SOUND command in line 20 was 1000, i.e. 10 
Seconds. 


Try experimenting yourself, to see what type of sounds you can create. 


If you wish to create a more intricate volume envelope, the 3 parameters: «number of 
Steps» , «size of step» , time per step: may be repeated at the end of the ENV command 
up to 4 more times, to specify a different ‘section’ of the same envelope. 


Creating a Tone Envelope 


The tone envelope command is ENT. In its simplest form, the command has 4 
parameters: The command is typed in as: 


ENT «envelope number. , ‘number of steps» , tone period of step: , lime per step» 


Once again, let's look at the parameters one by one. 


Envelope Number 


This is the reference number (between @ and 15) given to a particular tone envelope 
so that it can be called up in the SOUND command. 
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Number of Steps 


'This parameter specifies how many different steps of tone (pitch) you want the sound 
to pass through before it ends. For example, in a note which lasts 10 seconds, you may 
wish to have 10 tone steps of 1 second each. In such a case, the number of steps» 
parameter used should be 10. 


The available range of number of steps: is Ø to 239. 


Tone Period of Step 


Each tone step can vary in the range - 128 to + 127 with respect to the previous step. 
Negative steps make the pitch of the note higher, Positive steps make the pitch of the 
note lower. The shortest tone period is 0. This must be remembered when 
formulating the tone envelope. The full range of tone periods is shown in the chapter 


entitled ‘For your reference....”. 


Time per Step 


This parameter specifies the time between steps in 0.01 second (hundredths of a 
second) units. The range of «time per step. numbers is 0 to 255, which means that the 
longest time between steps is 2.56 seconds (Й is treated as 256). 


Note therefore, that the number of steps: parameter multiplied by the «time per step» 
parameter shouldn't be greater than the «duration» parameter in the SOUND 
command, otherwise the sound will finish before all the tone steps have been passed 
through. (In such а case, the remaining contents ofthe tone envelope are discarded.) 


Likewise, if the duration: parameter in the SOUND command is longer than the 
number of steps: multiplied by the -time per step», the sound will continue after all of 
the tone steps have been passed through, and will remain constant at the final tone 
pitch. 


Toexperiment with the tone envelope, type in the following program: 


10 ent 1,100,2,2 
20 sound 1,284,200,15,,1 
run 


Line 20 specifies а SOUND with a tone period of 284 (international a) lasting for 2 
seconds with a start volume of 15 (max), without a volume envelope (represented by 
a blank parameter , ,) and with tone envelope number 1. 


Line 10 is tone envelope number 1 consisting of 100 steps, increasing the tone pe- 
riod (reducing the pitch) by 2, every 0.02 second (2 x 0.01 second). 
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Now change line 18 in each of the following ways, and then RUN to hear the effect of 
changing the tone envelope: 


10 ent 1,100,-2,2 
10 ent 1,10,4,28 
18 ent 1,10,-4,20 


Now replacethe s ound command and the tone envelope by typing in: 


10 ent 1,2,17,78 

20 sound 1,142,140,15,,1 
30 goto 18 

run 


Press [ESC] twice to break. 


Now you can put the volume envelope, tone envelope, and s ound command together 
tocreate various sounds. Start with: 


10 env 1,10й,1,5 

20 ent 1,100,5,5 

30 sound 1,284,500,1,1,1 
run 


Then replace line 20 by typing in: 


20 ent 1,100,-2,5 
run 


Now replace all the lines by typing in: 


10 env 1,100,2,2 

20 ent 1,100,-2,2 

30 sound 1,284,200,1,1,1 
run 


If you wish to create a more intricate tone envelope, the 3 parameters: .number of 
Steps» , «tone period of step: , «time per step» may be repeated at the end of the ENT. 
command upto 4 more times, to specify a different ‘section’ ofthe same envelope. 


Try some more variations for yourself. Add some «noise» to the SOUND command, and 
try adding some extra sections to the volume and tone envelopes. 


The chapter entitled “Complete list of AMSTRAD CPC664 BASIC Keywords' 
contains full details of the various sound commands. If you are interested in the more 
melodius aspects of sound, see the section, "The Sound of Music’ which you will find in 
thechapter entitled “At your leisure. 
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AMSTRAD СРС664 FOUNDATION COURSE 


Part 10: Introducing AMSDOS and 
CP/M.... 


What is AMSDOS?.... 


When the computer is switched on or reset, the system defaults to operation under 
‘AMSDOS’. AMSDOS is an abbreviation of AMStrad Disc Operating System, and 
offers the following file handling commands: 


Load "filename" 


merge "filename" 
chain merge "filename" 
openin "filename" 
openout "filename" 
closein 

closeout 

cat 

input #9 

line input 89 

list #9 

print #9 

write #9 


In addition, AMSDOS provides a number of extra commands for disc management. 


These commands are called external commands, and are preceeded with a bar symbol 
|. (You will find the | symbol by holding down [SHIFT] and pressing the 8 key.) 


Some of the more common external commands that you will use are: 


la 
ib 
| t ape (which can be sub-divided into | tape. i nand I tape. out) 
Idi sc (which can besub-dividedinto ldisc. inandldisc.out) 


The commands ła and | b are used оп a 2-drive system, to tell the computer which 
drive to direct any subsequent disc command. 
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Typing in for example: 


la 
toad "filename" 


will tell the computer to load the specified program from a disc placed in Drive A. 


If neither | a nor | b is entered or the computer is reset, the system will default to 
Drive A. 


Ifyou are using only the disc drive within the computer, this can be regarded as Drive 
A, and | a or | b commands need not be issued. Entering | b when no additional disc 
drive is connected, will result in the message on the screen: 


Drive B: disc missing 
Retry, Ignore or Cancel 


to which you should respond С (to cancel). 


What if I want to use cassette?.... 


The command | tape tells the computer to perform all loading and saving etc. 
commands to an external cassette unit instead of to disc. Unless | t ape is entered, 
the computer will always default to disc operation when switched on or reset. 


The return to disc operation after | t ape hasbeen specified, type in: 191 sc 


Alternatively, you may for example wish to load in from cassette and save out to disc. 
You may then use the command: 


Itape.in 


„this command tells the computer to read data in from cassette, but continue to 
write data out onto disc (by default). 


Similarly, to read data in from disc and save out onto cassette, you will first need to 
type in: 1915с. їп to countermand the previously issued Í tape. in (above), 
then: | tape. out totell the computer to write data out onto cassette. 


It can be seen therefore that Itape.in and ltape.out countermand 
Idisc.inand Idisc.out respectively, and vice versa. 


Further information on directing data to and from discs and cassette will be found 
later in this manual in the chapters entitled ‘Using discs and cassettes’ and 
'AMSDOS and CP/M'. 


In part 7 ofthe Foundation course, you learned how to format a new blank disc using 
your master CP/M system disc, and how to copy programs from disc to disc. From the 
above description ofthe commands: 
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Itape Idisc Itape.in Itape.out Idisc.in Idisc.out la Ib 


.--you should now be able to perform loading and saving to either disc or cassette (if 
connected), placed in either Drive A or Drive B (ifconnected). 


Other external commands: 
Idir Idrive lera tren luser 


„аге dealt with later in this manual, in the chapter entitled ‘AMSDOS and CP/M’. 


Copying Using the CP/M System Disc 


The entire contents of a disc can be copied from one to another using the CP/M system 
disc. If you do NOT have an additional disc drive connected to the computer, use the 
DISCCOPY facility. 


Ifyou HAVE connected an additional disc drive, you will find it easier and faster to 
use the COPY DISC facility. 


Copying Using DISCCOPY 


Insert the CP/M system disc and type in: 
Ісрт 
After the prompt А> арреатв оп the screen, typein: di sccopy 
The computer will ask you to: 
Please insert source disc into drive A then press any key 
Remove the CP/M system disc from the drive, and insert the disc that you wish to 


copy. If you wish to make a back-up copy of the CP/M disc itself, simply leave the 
CP/M disc inserted in the drive. 


When you have inserted your source disc and pressed a key, the computer will 
display the message: 


Copying started 
Reading track Ü to 7 
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After which, you will be asked to: 


Please insert destination disc into drive А 
then press any key 
Whereupon you should remove your source disc and insert a disc for copying onto. 


Bear in mind that any previous data on your destination disc will be overwritten 
during copying. 


If you insert a wrongly formatted or new unformatted disc into the drive, it will be 
correctly formatted automatically during copying. 


After you have inserted your destination disc and pressed a key, the computer will 
display the message: 
Writing track 9 to 7 


„гапа will then invite you to insert the source disc once again for reading tracks 8 to 
15. The reading/writing process will continue, 8 tracks at a time, until the last track 
(39) is completed. 


You will then be asked: 
бо you want to copy another disc (Y/N): 


If you have finished copying, answer N, then follow the instructions on the screen to 
exit from the DI SCCOPY mode. 


Copying Using COPYDISC 


COPYDISC can only be used if you have connected and additional disc drive. The 
facility enables you to copy the entire contents of one disc to another, in a similar 
manner to DISCCOPY previously described. The advantage of COPYDISC 
however, is that you do not have to repeatedly insert and remove the source and 
destination discs. 


Having read and understood the principles of DI S C COPY, COPYDISC may then be 
performed as follows: 


Insert the CP/M system disc and type in: 
Ісрт 
After the prompt А> type in: 


copydisc 
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Follow the instructions оп the screen, and the contents of your source disc will be 
copied onto your destination disc 8 tracks at a time, until the last track (39) is 
completed. Like 015ССОРҮ, COPYDISC incorporates automatic formatting if 
required. COP YD I S € can also be used to produce a back-up copy of the CP/M system 
disc itself. 


Checking Discs 


The CP/M system disc provides facilities for comparing one disc against another, to 
check for error free data copying. 


1f you have NOT connected an additional disc drive to the computer, select CP/M 
then type in: 


discchk 


Follow the instructions on the screen, and the destination disc will be checked 
against the source disc. If the computer detects a difference between the discs, it will 
display the message: 


Failed to verify destination disc correctly: 
(track x sector y) 


Otherwise, the computer will continue to check through the discs, 8 tracks at a time, 
until checking is completed. If an error was detected, a final WARNING: will be 
displayed on the screen, before asking whether you wish to check another disc. 


If you HAVE connected an additional disc drive, disc checking may be carried out 
with more speed and ease, using thé CHKD I S C facility. This operates in a similar 
manner to DISC CHK previously described. The advantage of CHKD IS C however, is 
that you do not have to repeatedly insert and remove the source and destination 
discs. To use CHKD I SC, select CP/M then type in: 


chkdisc 


and follow the instructions on the screen. 


Aborting 


Note that functions performed using the CP/M system disc can be aborted by holding 
down [CTRL] and pressing the С key. Doing so will return you to direct mode CP/M 
(This is called ‘Direct Console Mode’). 
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Asanexample, select CP/M and type in: 
disccopy 


When the computer invites you to insert a disc, press [CTRL]C. The funtion will then 
beaborted. 


Further information on DISCCOPY, COPYDISC, DISCCHK and CHKDISC 
together with FORMAT and other CP/M commands will be found later in this manual 
in the chapter entitled ‘AMSDOS and CP/M’. 


Finally, check that you have observed the following warnings given at the beginning 
ofthis manual, in the section entitled IMPORTANT’: 


INSTALLATION NOTES5,6,7 
OPERATION NOTES 1,2,3,4,5,6,7,8,9 


Well, that concludes this 10-part Foundation course on the СРС664. By now you 
should know what most of the keys on the keyboard do, how to use some of the simpler 
BASIC commands, how to format a brand new disc so that it’s ready to use, and how 
to perform some of the most elementary disc functions, ie. LOADing, SAVEing, 
CATaloguing etc, together with a few simple AMSDOS and CP/M commands. The 
next part of this manual looks at the more specialised aspects of computing and 
AMSTRAD BASIC. It goes in-depth into the disc drive section of the unit, with 
sections on AMSDOS and CP/M, and starts you off on a new language - Dr. LOGO 
from Digital Research. 
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Chapter 2 
Beyond Foundations 


So you've read the Foundation course and you have the computer 
Switched on in front of you. You've already learnt how to make it 
carry out an operation several times over using а FOR NEXT 
loop, and how to make it test IF a condition is true THEN do 
something. 


Well, you're soon going to tire of seeing your name printed all over the screen, and 
will want to get on with some serious computing - something useful or entertaining. 
The chapter after this, lists each ofthe AMSTRAD BASIC keywords at your disposal, 
together with a description of the ‘syntax’, and what the keyword is used for. Armed 
with this list, the scope of what you can then make the computer do is limited only by 
your imagination. 


If you have never used a computer before, the idea of actually ‘programming’ may fill 
you with apprehension. Fear not! It’s a lot easier than you think, and certainly a lot 
easier than the technology and jargon would have you believe. Think of BASIC not as 
a new language, but as a variation of English with some words abbreviated to speed 
things up. In other words, don't think of C LS as3 letters of magic code, but instead as, 
CLear Screen. 


Тгу not to be afraid of BASIC, and you'll soon find yourself enjoying the business of 
programming, as well as the fruits of your endeavours. Programming can be a very 
rewarding exercise, especially when you're a beginner experimenting with the 
machine and the language. Always remember that as long as you make sure that you 
don't accidentally write onto your master CP/M system disc, nothing you type in can 
actually harm the computer, and it's always worth trying something new. 


So where do I start? 


Starting is often the most difficult part of the program for the beginner. However, 
what you should avoid doing, is plunging straight in and hacking away at the 
keyboard without any forethought. 


One of the first things you should establish, is what exactly you want the program to 
do, and how you want the results to be presented to you (in other words, what the 
screen should look like as the program runs). 


Having decided this, you can then start writing a program to fulfil your 
requirements, all the time thinking of how to make the program flow smoothly from 
beginning to end, with the minimum of jumping around using GOTO here and GOTO 
there. A good program will be easy to follow when listed, and will not land you ina 
hopeless muddle when you try to fault find, or ‘de-bug’ as they say in computer talk. 
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Fortunately, BASIC is a very forgiving language and will often help you by 
producing error messages on the screen when you go wrong. BASIC also allows you to 
have ‘afterthoughts’, and new lines of program can be sandwiched in between the 
existing lines with a minimum of fuss. 


Writing a simple program 


OK let's get going. We'll write a program to keep a record of our friends’ names and 
telephone numbers. We'll call the program "Telephone book'. Now let's apply the 
above rules: "What should the program do? and 'How should the results be 
presented?" 


Well, the program should let you enter up to say, 100 names and 'phone numbers for 
storage. When you want a number, you should be able to type in the name and get 
back the number. In addition, if you're not sure how one of the names was originally 
entered, you should be able to display a complete list of all the information on the 
screen. Notice by the way, that we're automatically starting to consider the question 
of how the results ofthe program are to be presented. 


Right, let's put finger to keyboard! We'll start off with the title at the beginning: 
10 REM telephone book 


You don't have to put a title іп a program, but when you start to accumulate quite a 
few programs, it helps to be able to know at a glance which is which. 


Next, we know that we want to be able to INPUT (put in) a string of characters 
(somebody's name) into a variable; we'll call that variable NAME $. The same applies 
to the telephone number, and we'll call that variable TE L$. 


Remember those example programs from the Foundation course? They used the 
INPUT command for you to enter the value of the variable, so if we type in: 


20 INPUT "enter the name";NAMES 
30 INPUT "enter the telephone number";TELS 
run 


You could enter the name, for example: Joe. You could then enter the 'phone number, 
for example: 0277 230222 


The program has stored the information, but hasn't produced any printed results on 
the screen. A section of program is therefore needed to retrieve the information, then 
display it. To get the values of NAMES and TE L $ at the moment, we'd use commands 
like: 


PRINT NAMES...and..PRINT TELS 
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But hang on! We said that we want to Бе able to store up to 100 names and 100 'phone 
numbers in the program. Surely we don't have to write a program with two hundred 
INPUT commands, each with a different variable name, and then two hundred 
PRINT commands to produce a list on the screen??? Don't worry, computers make 
provision for this with what's known ав an ‘array’. An array allows you to use one 
variable (such as NAMES) which сап have any number of ‘dimensions’ (in our 
program, we require 100). Then, when you want to get at the contents of the variable, 
you use the variable's name followed by its reference number (inside brackets). This 
reference number is called a ‘subscript’ and the expression NAMES(27) for 
example, is called a ‘subscripted variable’. Now if we use a number-variable as the 
subscript, for example NAMES Сх), we can then process the whole list of variables 
from 1 to 100 by changing the value of x ina FOR NEXT loop, i.e. FOR х=1 ТО 100 
As the value of x increases by 1, so the subscript value changes and refers to а 
different ‘element’ or name in the NAMES array. 


We want two arrays; one for NAME $, and one for T E L$, each with a dimension of 100 
elements. Before we can start using an array, we must declare its D I Mensions at the 
outset. We'll overwrite lines 10 and 20 with these statements: 


20 DIM NAMES(C100) 
30 DIM TEL$(100) 


Having established our variables, let's write some program that will firstly enable us 
to enter the names and numbers into the arrays, for later retrieval. Add: 


40 FOR x=1 TO 108 

50 INPUT;" name";NAMES(x) 
60 INPUT " phone";TELS(x) 
70 NEXT 

run 


This is all very well, but we may not want to enter all 100 names at once. What's 
more, the way that the program presents itself on the screen is most unsatisfactory. 
What's needed here is a bit of tidying up. Firstly, before taking input of each new 
name and number, let's rid the screen of all the previous superfluous text, by 
CLearingthe Screen each time. Add: 


45 CLS 


Now, how do we get the computer to know that we've finished inputting information 
for the moment? Pressing [ESC] would stop the program alright, but as soon as you 
typed RUN again, you'd lose all the values of your carefully entered variables! 
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Here's what we can do instead. As the program takes input ofa new name, we'll make 
the program check that at least something has been typed in for the value of 
NAMES (x), in other words, check whether the value of NAME $ (x) is an ‘empty 
string’ or not. I F itis, THEN we'll make the program stop taking any more input. Did 
you get the clue on how we can do this? Add: 


55 IF МАМЕ5(х) THEN 80 
80 PRINT "no more input" 


Also, so that the program tells you how to stop inputting, add: 
47 PRINT "LENTERJ nothing to end input" 


Now let's write some program to PRINT the information you've stored, firstly in the 
form ofa list. Add: 


90 FOR x-1 TO 100 
100 PRINT МАМЕ5(х);" ";ТЕ{$(х) 
110 NEXT 


Once again the program doesn't know when to stop, before reaching the 100th 
element of the array, so let's add: 


95 IF МАМЕ$(х) ="" THEN 120 
120 PRINT “List finished" 


Line 95 detects whether NAMES (x) is an empty string, and IF so, THEN stops 
printing by bypassing lines 100 and 110. 


And so to the next of our requirements. We'll now write some program that searches 
fora particular name that you enter. Add: 


130 INPUT "find";SEARCHS 
140 FOR x-1 TO 100 
150 IF INSTR(NAMES(x 


ЅЕАКСН$) =Й THEN 180 


160 PRINT NAME$OO;" ";ТЕ15(х) 
170 END 

188 NEXT 

190 PRINT "name пос found" 
run 
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У 


Тһеге a new command іп line 150 - INSTR. It tells the computer to INterrogate 
the first S T Ring expression to find the first occurence of the second string expression, 
in other words, it searches NAMES (x) for SEARCH$ (which is the variable you 
input in line 130 containing the name that you're looking for). If INS TR doesn't find 
it (or any part of it), it gives out a value of 0, which is used here to make the program 
pass to line 180 and try again with the NEXT value of x. If the program has passed 
through all values of x up to 100, it then continues to line 190 and tells you thatit 
hasn't found the name. If however it does find the name, INSTR will not produce a 
value of 0, and the program will then pass from line 150 to 168 and print the name 
and phone number, then END at line 170. 


As you can see, our program is developing quite rapidly now, but there's still so much 
to be done. Let's sit back for a moment and consider some drawbacks of this program, 
starting with the way in which the program runs: First you type in the information, 
then you get a list back, then you search for a specific name. 


Whatif? 


Well, what if you don't want to do it in that order? What if you want to start by 
searching for a name that you stored in the program yesterday? And what if you want, 
to add some more names and numbers to those already there? These are all aspects of 
the program that you have to think about and find solutions for; it's what 
programming is all about. As previously mentioned, BASIC is kind enough to let you 
sandwich afterthoughts into the program, but a good programmer will have 
anticipated these problems beforehand. 


Another major problem with this program is that the values of the variables in the 
arrays are all stored in a part of the computer's memory that is cleared whenever you 
RUN a program. You'll not want to have to type in all the information every time you 
use the program, so you'll need the option of being able to save the values of all the 
NAMES and TEL$ variables before you switch off, together with the option to load in 
the values ofthe variables whenever you run the program. 


Solutions 


The first of these problems (i.e. the order in which things are carried out) can be dealt 
with by writing the program so that when it runs, you get a choice of the various 
functions that it can perform. This type of program is called ‘menu-driven’, and in 
effect displays a menu on the screen from which you can select an option. If you've 
ever used one of those cash dispensers outside the bank, then you'll have already 
operated a menu-driven computer program! Let's add a menu to this program: 
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— ———————————— 


32 PRINT "1. enter info" 

33 PRINT "2. List info" 

34 PRINT "3. search" 

35 PRINT "4. save info" 

36 PRINT "S. load info" 

37 INPUT "LENTERJ menu selection" 
38 ON ms 60508 40,90,1350 


85 RETURN 

125 RETURN 
170 RETURN 
200 RETURN 


As you can see, we've made the program print the menu of options, then take INPUT 
of your selection, putting it into the variable ms. The command ON ms GOSUB in line 
38 tells the program that if ms=1 then GO to the first SUB-routine line number 
(40); if ms =2 then GO tothe second S UB-routine line nurnber (90), and soon. 


Aseach ofthe functions are now sub-routines called by the ON ms G0 SUB command, 
they must each have a RETURN command at the end, hence we have added all those 
RETURN commands above. 


Do you remember what the RE TURN command does? It makes BASIC return from 
the sub-routine to the point in the program immediately following the appropriate 
GOSUB command, so in this case it returns to the instruction after line 38 (which 
means that the program will continue at line 40 - the ‘enter info’ point!) We don't 
want that to happen, so we must add: 


39 GOTO 32 


»...to make the program loop back and display the menu once again. Now RUN the 
program again to see how far we've progressed. 


OK let's have a look at the listing of the program for a moment. (Ifthe program is still 
running, press [ESC] twice.) Type in: 


LIST 
This is what you should have so far: 


10 REM telephone book 
20 DIM NAMES(10B) 

30 DIM ТЕ(8(100) 

32 PRINT "1. enter info" 
33 PRINT "2. List info" 
34 PRINT "3. search" 

35 PRINT "4. save info" 
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PRINT " 


- load info" 


INPUT "LENTERJ menu setection";ms 
ON ms GOSUB 40,90,130 
GOTO 32 

FOR х=1 TO 100 

[15:1 

PRINT ENTERJ nothing to end input" 
INPUT;" name";NAMESCO 

IF NAMES(x) THEN 80 

INPUT " рһопе";ТЕ15(х) 
NEXT 
PRINT "no more input" 

RETURN 

FOR x=1 TO 188 

IF NAMES(x)="" THEN 120 

PRINT NAME$(x);" ";TELSGO 

NEXT 

PRINT "List finished" 

RETURN 

INPUT "find";SEARCH$ 

FOR x-1 TO 100 

IF INSTR(NAMES GO ,SEARCHS) -0 THEN 180 
PRINT МАМЕ$(х);" ";TELSOO 
RETURN 

NEXT 

PRINT "name not found" 

RETURN 


You'll see that in certain parts of the program, we're starting to run out of lines to 


insert in: 


structions, so let's create some more space and tidy things up by 


RENUMbering the lines. Type in: 


REN 
LIS 


UM 
T 


You should now see: 


REM telephone book 

DIM NAME$(100) 

DIM TELS(188) 

PRINT "1. enter info" 

PRINT "2. list info" 

PRINT "3. search" 

PRINT "4. save info" 

PRINT "5. load info" 

INPUT "[ЕМТЕВ] menu selection";ms 
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100 ON ms GOSUB 128,218,278 


110 GOTO 40 
120 FOR x=1 TO 100 
130 CLS 


ТАЙ PRINT "CENTER] nothing to end input" 
150 INPUT;" name";NAMES(x) 
160 IF NAMES(x) THEN 190 


170 INPUT " phone"; TEL$Cx) 
180 NEXT 

190 PRINT "no more input" 
200 RETURN 


210 FOR x=1 TO 1 
220 IF МАМЕЅ (х) -"" THEN 250 

230 PRINT МАМЕ$(х);" ";TELSOO 

240 NEXT 

250 PRINT "List finished" 

260 RETURN 

270 INPUT "find";SEARCHS 

280 FOR x-1 TO 100 

290 IF INSTRCNAMES(x),SEARCHS)=0 THEN 320 
300 PRINT МАМЕ$(х);" ";TELSOO 

310 RETURN 

320 NEXT 

330 PRINT "name not found" 

340 RETURN 


That's better. Now on with the program! We'll now add an instruction, so that 
whenever you enter some new names and 'phone numbers, the computer will add 
them to the existing entries, by placing them in the first element of the array that it 
finds to be empty. This time, we'll use the new command LEN to tell us the LENgth of 
thestring. We'll specify the following: 


IF the LENgth of NAMES (x) is greater than 0, i.e. if there's already an entry in 
that element ofthe array, THEN jump to line 180 (which steps to the NEXT element 
inthearray). 


Notice again how similar the above instruction in English is, compared to the 
equivalent BASIC instruction just below. I told you that BASIC isnt really a 
different language!!! 


135 IF LEN(NAME$(x))»0 THEN 180 


Such a simple solution isn't it? Problems like these can always be sorted out with your 
list of BASIC keywords and a little thought. There's nearly always at least one 
command that will satisfy your programming needs, and the more you program, the 
more you'll be able to find instant solutions ‘off the top of your head’. 
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Now to the matter of saving the contents of the variables so that they сап be loaded 
back in when the program is run. Part 7 of the Foundation course explained how to 
save the program itself, using the SAVE command. However the program itself is 
only a framework which lets the variable values be put in (at the keyboard) and taken 
out (at the screen). When you SAVE the program, you are saving only that 
framework, not the values ofthe variables. 


Hence we must write a section of program that will save the values of the variables 
onto disc. We do this by creating a separate ‘data file’. 


First we OPEN ап OUTput file and specify a name for it such аз "Фата". Then we 
WRITE the values of the variables NAME $ (x) and TELS (x) from 1 to 100, into 
the file, and finally we C LOSE the OU Три file and RETURN tothe ménu. Let's add it 
to the program from line 550 onwards. To save us typing in each new line number, 
we'll use the command: 


AUTO 350 
.... Which will start AUT Omatic line numbering from the required line: 


350 OPENOUT "data" 

360 FOR х=1 TO 100 

370 WRITE #9,NAMES(x),TELS(x) 
380 NEXT 

390 CLOSEOUT 

400 PRINT "data saved" 

410 RETURN 


After you have typed in line 410 and [ENTER]ed it, press [ESC] to stop the 
AUT Omatic line numbering. 


Now we need to add an extra number to the list of numbers in the ON ms GOSUE 


command in line 100. This is because we have added another option for the menu tc 
select. Therefore E D I T line 100 to add this extra number: 


100 ON ms 60508 128,210,278,358 


Now, whenever you select menu option number 4, the program will save all tht 
information that you entered, onto disc. 


Notice that in line 370, where the program WR I T Es the values of NAME $ (x) anc 
TELS (x) onto disc, the expression #9 is used after the word WRITE. The # sign is: 
‘stream director’, in other words, it tells the computer which ‘stream’ to send the dati 
to. The computer has 10 streams: 


Directing data to streams 0 to 7 (#0 to #7) will result in it appearing on the screer 
because streams # to 87 are ‘screen streams’ or WINDOWs. 
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Directing data to stream #8 sends data to {һе printer (if connected). 


Finally, directing data to stream #9 sends it to the disc drive, which is what we have 
done in line 370. 


If I may digress.... 


A few words now about the AUTO command which we used a moment ago. If you 
leave out the line number and just type in: 


AUTO 


...the computer will commence line numbering from 10, advancing by 10 each time 
the line is [ENTER]ed. If you have previously used lines 10, 20, 30 etc, each line's 
contents will be displayed on the screen as you pass through it (by pressing [ENTER] 
each біте). When each line appears оп the screen, it may be edited before pressing 
[ENTER], thus providing a quick method of continuously editing regularly successive 
program lines. 


Back to the program.... 


We've now added the instructions to save the information to disc, so the final main 
section of this program will load the data back from disc, ready for use. Therefore, we 
must add yet another menu option to the list of numbers in line 100. Edit line 100 
again, as follows: 


100 ON ms GOSUB 120,210,270,350,420 


Now for the instructions to load the information. We start by OP ENing the I Nput file 
from disc called "data". Then we take INPUT from disc (stream 49) of all the 
values of the variables NAMES (x) and TELS (x) from 1 to 100, and lastly we 
CLOSE the INputfileand RETURN tothe menu. Type in: 


426 OPENIN "data" 

430 FOR x=1 TO 100 

440 INPUT #9,NAMES(x),TELS(x) 
450 NEXT 

468 CLOSEIN 

470 PRINT "data Loaded" 

480 RETURN 
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The end of the beginning.... 


So now we have written a program which fulfils the requirements that we set out to 
achieve when we decided ‘what the program has to do’. АП that remains now, is to 
improve the way that “the results are presented’ on the screen. 


The beginning of the end. 


Let's add some instructions to tidy up the presentation of the program: - 
34 MODE 1 


This establishes the screen mode, and clears the screen at the start of the program. 
Now add: 


36 WINDOW 41,13,30,10,14 


Don't be put off by this seemingly complicated instruction. What we're doing here is 
creating a small window on the screen to put the menu into. After the word WINDOW, 
we first specify which stream number this window is for, remember we can use 8 
screen streams from #0 to #7. Now bearing in mind that all items printed on the 
Screen use stream # unless otherwise instructed, we won't use stream #Й for our 
little window, otherwise everything that the program prints will be sent to it. Instead 
we'll specify another stream between #1 and #7, and as you can see, we've chosen 
81. The four numbers that follow #1, tell the computer what size the WINDOW 
should be, and it couldn't be easier; the numbers specify the left, right, top, and 
bottom edges of the window, and refer to text column and row numbers (the same as 
those used in the LOCATE command). So in our example, after specifying that it’s 
stream # 1 we're using, we say that the left edge of the window starts at column 13, 
the right edge ends at column 30, the top edge starts at row 10, and the bottom edge 
ends atrow 14. 


Now to make all our menu options print in stream (WINDOW) 41, we'll have to edit 
lines 4 to 80 as follows: 


40 PRINT #1,"1. enter info" 
50 PRINT 41,"2. list info" 
60 PRINT 41,"3. search" 

76 PRINT #1,"4. save info" 
80 PRINT #1,"5. load info" 


Let'snow add: 


85 LOCATE 7,25 
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This LOCATEs where the menu I NPUT statement іп line 9Й will appear, во that it 
looksneater. 


So that the screen is always cleared when the menu is returned to, edit line 1 1 to: 
110 GOTO 34 

So that the screen is always cleared when one of the menu options is selected, add: 
95 CLS 


Finally, we'll just add the following three lines to make the program pause before 
returning to the menu: 


105 LOCATE 9,25 
105 PRINT "pres 
107 IF INKEY$ 


any key for menu" 
THEN 107 


Line 103 tells the computer where to print the message given in line 105. Line 107 
INterrogates the KE Yboard to see what $tring variable is being input (Бу a key 
being pressed). I F it detects that an empty string is being input (because no key is 
pressed), THEN the program loops back to the same instruction again and again, 
until INKE Y $ finds that the string is not empty because a key has been pressed. This 
is a useful way of creating a pause in a program, as BASIC will not pass to next line 
until a key is pressed. 


So there it is; the finished program. Or is it? Well, you could make it have the facility 
to amend and delete names and 'phone numbers, to sort the list into alphabetical 
order, to 'print-out' the list on a printer, or if you're really ambitious, to make the 
program produce the signals to automatically dial the number after you've typed in 
the name - with of course, the permission of British Telecom to connect your 'phone to 
the computer! Nevertheless all these enhancements to the program are possible, and 
in truth you can go on forever improving and streamlining a program, especially 
when you've got a computer system as powerful as the CPC664. No, we've got to draw 
the line somewhere, and this is where we'll leave our ‘telephone book’, hopefully 
having learned a thing or two about the art of writing a program from scratch. Tidy 
up the program by typing in: 


RENUM 


....and then save it to disc, or throw it away. You never know though, it might come in 
handy for keeping a record of your friends’ names and telephone numbers! 
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Final listi 


ing: 


REM telephone book 
DIM МАМЕ5(100) 
DIM TEL$(100) 
MODE 1 
WINDOW #1,13,30,1@,14 
PRINT #1,"1. enter info" 
PRINT #1,"2. list info" 
PRINT #1,"3. search" 
PRINT #1,"4. save info" 

PRINT £1,"5. load info" 

LOCATE 7,25 

INPUT "LENTERJ menu selection";ms 
CLs 

ON ms GOSUB 190,290,350,450,500 
LOCATE 9,25 


PRINT “press any key for menu" 
IF INKEYS="" THEN 170 

GOTO 48 

FOR x=1 TO 100 

сі5 


IF LEN(NAMES(x))»Q THEN 260 
PRINT "LENTERJ nothing to end input" 


INPUT;" name";NAMES(x) 
IF NAMES(x)="" THEN 270 
INPUT " phone"; TEL$(x) 


NEXT 

PRINT "no more input" 
RETURN 

FOR x=1 TO 100 

IF NAMES(x)="" THEN 330 
PRINT NAMES(x);" ";TELSCx) 
NEXT 

PRINT "List finished" 
RETURN 

INPUT "find";SEARCHS 


FOR x=1 TO 100 

IF INSTR(NAMES (х),ЗЕАВСН$)=В THEN 400 
PRINT МАМЕ5(х);" ";TELSCx) 

RETURN 

NEXT 

PRINT "name not found" 

RETURN 


OPENOUT "data" 


Beyond Foundations 
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448 
450 
460 
470 
480 
490 
500 
518 
520 
530 
540 
550 
560 


run 


FOR x=1 TO 100 

WRITE #9,NAMES(x),TELS(x) 
NEXT 

CLOSEOUT 

PRINT “data saved" 

RETURN 

OPENIN "data" 

FOR x=1 TO 100 

INPUT #9,NAMES(x),TELS(x) 
NEXT 

CLOSEIN 

PRINT “data loaded” 
RETURN 
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Beyond Foundations 


Chapter 3 Complete list of 
Amstrad CPC664 BASIC keywords 


IMPORTANT 


It is vital that you understand the terminology and notation that 
we use in this chapter. You will see various types of brackets used 
when explaining how a particular command is typed in; each of 
these types of brackets has a specific meaning, and you should 
note them well. 


Any part of a command not shown enclosed by brackets is required as given. For 
example, the command END takes the form: 


END 


....and you must type in the word END literally. 
Where an item is enclosed іп angled brackets « for example: 


«line number, 


„you are NOT required to type the brackets, nor the words within them. The 
example above shows you the type of data required in the command. For example: 


EDIT dine number 

...means that you should type in: 
EDIT 100 

Round brackets ( ) MUST be typed in literally. For example: 
COS С.пшпегіс expression: ) 


....requires that brackets be typed around the «numeric expression: of which the 
COSine is required, e.g: 


PRINT С05(45) 
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Finally, square brackets епсіове optional items іп а command or function. For 
example: 


RUN [line number;] 
-...means that you do not have to follow the keyword RUN with a parameter, but that 
you can expand the command by adding the optional parameter (ine number. 
Hence, the command could be typed in as: 


RUN „ог... RUN 100 


Special Characters 

&or&H Prefix for hexadecimal constant 
&X Prefix for binary constant. 

# Prefix forstream director 


Datatypes 


Strings may be from 0 to 255 characters long. A string expression» is an expression 
which yields a value of type string. Strings may be appended to one another using the 
+ operator, as long as the resulting string is no greater than 255 characters long. 


Numeric data сап be either integer or real. Integer data is held in the range —32768 
to 32767 and real data is held to a little over nine digits of precision in the range 
+1.7Е +38 with the smallest value above zero approximately 2.9Е —39. 


A «numeric expression: is any expression that results in a numeric value. It may 
simply be numbers, or it may be a numeric variable, or it may be numbers operated on 
by variables; just about anything that is not a «string expression». 


A «stream expression: refers to a «numeric expression: which identifies а screen 
window, printer, or disc, where the text is required to ‘stream’. 


A ‘list of:<item, describes a parameter which comprises a list of items separated by 
commas. The list may contain one, or any number of items, limited by line length. 


Туре markers are: 


X Integer 
! Real (Thedefault) 
$ String 
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Please note that AMSTRAD CPC664 BASIC keywords are listed here using the form: 


KEYWORD 
Syntax 
Example 
Description 


Associated keywords 


Keywords are either: 


COMMANDS :operationsthat are executed directly. 

FUNCTIONS :operationsthat are brought into action as arguments 
inanexpression. 

OPERATORS :acting upon mathematical arguments. 

BASIC converts all keywords entered in lower case letters to UPPER CASE when a 

program is LISTed. The examples shown in this chapter use UPPER CASE, since 

this is how the program will appear when LISTed. Hence you should enter using 

lower case, as you will be able to spot typing errors more readily since the mis-typed 

keyword will still be displayed in lower case when LI S Ted. 


For a comprehensive guide to AMSTRAD CPC664 BASIC, see the Concise BASIC 
specification SOFT 945. 


Keywords... 
ABS 


ABS (numeric expression ) 


PRINT ABS(-67.98) 
67.98 


FUNCTION: Returns the AB Solute value of the given expression. This means that 
negative numbers are returned as positive. 


Associated keywords: SGN 
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AFTER 
AFTER «timer delay , timer number] GOSUB -line number» 


18 AFTER 258 GOSUB 60:С15 

20 PRINT "Guess a letter in 5 seconds" 
30 a$-INKEYS:IF flag-1 THEN END 

40 IF a$<>CHRSCINTCRND*26+97)) THEN 30 
50 PRINT a$;" is correct. You win" 

55 SOUND 1,478:SOUND 1,358:END 

60 PRINT "too late. I win" 

70 SOUND 1,2000:flag-1:RETURN 


COMMAND: Calls a BASIC sub-routine after a given period oftime has elapsed. The 
«timer delay» parameter specifies the period of time in units of 0.02 (fiftieths) second. 


‘The timer number; (in the range 0 to 3) specifies which of the four delay timers are to 
be used, Timer 3 has the highest priority; timer 0 (the default timer) has the lowest. 


Each of the timers may havea sub-routine associated with it 


Further information concerning interrupts will be found in part 2 of the chapter 
entitled ‘At your leisure....'. 


Associated keywords: EVERY, REMAIN, RETURN 


AND 
«argument» AND «argument» 


IF "alan"«"bob" AND "dog"»" THEN PRINT "correct" ELSE PRINT "urong" 
correct 

IF "bob"«"alan" AND "cat"»"dog" THEN PRINT "correct" ELSE PRINT "wrong" 
wrong 

IF "аап" <"роЬ" AND "cat"»"dog" THEN PRINT "correct" ELSE PRINT "wrong" 
wrong 


PRINT 1AND T 
1 

PRINT OANDG 
[] 


PRINT ТАНОВ 
e 


OPERATOR: Performs bit-wise boolean operation on integers. Result is @ unless 
both argument bits are 1. 


Further information concerning logic will be found in part 2 of the chapter entitled 
‘At your leisure. 


Associated keywords: OR, NOT, XOR 
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ASC 
ASC (string expression») 


PRINT ASC("x") 
120 


FUNCTION: Returns the numeric value of the first character in the «string 
expression». 


Associated keywords: CHR $ 


АТМ 
АТМ Canumeric expression: ) 


PRINT ATN(1) 
0.785398163 


FUNCTION: Calculates the Arc-TaNgent of the numeric expression». 
Note that DEG and RAD can be used to force the result of the above calculation to 
degrees or radians respectively. 


Associated keywords: COS, DEG, RAD, SIN, TAN 


AUTO 
AUTO [dine number»][, increment] 
AUTO 100,50 


COMMAND: Generates line numbers AUT Omatically. The optional Jine number» 
parameter sets the first line to be generated in case you wish to generate lines from a 
particular point in the program. If the parameter is omitted, line numbers will be 
generated from line 10 onwards. 


The optional increment: sets the number of lines to leave before generating the 
following line number. If the parameter is omitted, the line numbers will increase by 
18 each time. 


Ifa line number is generated which is already in use, then the contents of the line will 
be displayed on the screen and may be edited if required. The displayed line will be 
replaced in the memory when [ENTER] is pressed. 


Tostop automatic line numbering, press [ESC]. 
Associated keywords: none 
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BIN$ 
BIN$ (.unsigned integer expression.[ , integer expression.]) 


PRINT BINS(64,8) 
01000000 


FUNCTION: Produces a string of BINary digits representing the value of the 
«unsigned integer expression», using the number of binary digits i 
second «integer expression» (in the range 0 to 16). If the number of di; 
too great, the resulting expression will be filled with leading zeros; if the number of 
digits instructed is too small, the resulting expression will NOT be shortened to the 
instructed number of digits, but will be produced in as many digits as are required. 


The unsigned integer expression: to be converted into binary form must yield a value 
intherange —32768 to 65535. 


Associated keywords: DEC$, HEX$, STR$ 


BORDER 


BORDER «colour/[ , colour») 


10 REM 729 border combinations! 
20 SPEED INK 5,5 

30 FOR а=й TO 26 

40 FOR b=0 TO 26 

50 BORDER a,b:CLS:LOCATE 14,13 
60 PRINT "border"; 
70 FOR t-1 TO 500 
80 NEXT t,b,a 


COMMAND: Changes the colour of the border on the screen. If two colours are 
specified, the border alternates between the two at a rate determined in the SPEED 
INK command. The range of border colours is 0 to 26. 


Associated keywords: SPEED INK 


BREAK 


(See ON BREAK CONT, ON BREAK GOSUB, ON BREAK STOP) 
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CALL 
CALL «address expression.[ , list of: parameter] 
CALL @ 


COMMAND: Allows an externally developed sub-routine to be called from BASIC. 
The above call completely resets the computer. 


Nota command tobe used by the unwary. 


Associated keywords: UNT 


CAT 
CAT 

CAT 
COMMAND: CATalogs the disc. Displays in alpha-numeric order, the full names of 
all files found, together with each file's length (to the nearest higher Kbyte). The free 
space left on the disc is also displayed, together with Drive and User identification. 
Cataloguing does not affect the program currently in memory. 
Associated keywords: LOAD, RUN, SAVE 


CHAIN 
CHAIN .filename/f , line number expression: | 
CHAIN "testprog.bas",358 
COMMAND: Loads a program from disc into the memory, replacing the existing 
program. The new program then commences running, either from the beginning, or 
from a line specified in the optional -line number expression». 
Protected files, (S AVEd by , p )can be loaded and run by CHA I Ning. 
Associated keywords: CHAIN MERGE, LOAD, MERGE 
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—————————————————— 
CHAINMERGE 


CHAIN MERGE filename! ,-linenumber expression>] 
[,DELETE linenumber range} 


CHAIN MERGE "newrun.bas",750,DELETE 400-680 


COMMAND: Loads a program from disc, merges it into the current program in the 
memory, then commences running the resultant program, either from the beginning, 
or from a line specified in the optional «line number: expression». If before a program is 
CHAIN MERGEZ,itis required to delete part of the original program, the DELETE 
«line number range: option may be used. . 

Note that line numbers іп the old program which exist іп (һе new program to be 
CHAIN MERGEd,willbeover-written by thenew program lines. 
Protected files, (5 AVEd by ,р)сап NOT be loaded and run by CHAIN MERGEing. 
Associated keywords: CHAIN, DELETE, LOAD, MERGE 


CHR$ 

CHR$ C integer expression: ) 
10 FOR x-32 TO 255 
20 PRINT x;CHR$(x), 
ЗИ NEXT 
run 


FUNCTION: Converts an “integer expression» іп the range 0 to 255, to its CHaRacter 
String equivalent, using the AMSTRAD CPC664 character set shown in part 3 ofthe 
chapter entitled ‘For your reference....’. 


Note that 0 to 31 are control characters; hence the above example prints CHR$ (x) 
in the range 32 to 255. 


Associated keywords: ASC 
CINT 


CINT (numeric expression: ) 


10 n=1.9999 

20 PRINT CINT(n) 
run 

2 


FUNCTION: Returns the value of the «пшпегіс expression’, Converting 
ittoarounded INTeger in the range —32768 to 32767. 


Associated keywords: CREAL, FIX, INT, ROUND,UNT 
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CLEAR 
CLEAR 
CLEAR 


COMMAND: Clears all variables to zero or null. All open files are abandoned, all 
arrays and user functions are erased, and BASIC is set to radians mode of calculation. 


Associated keywords: none 


CLEARINPUT 
CLEAR INPUT 


18 CLS 

20 PRINT "Type in Letters now!" 
30 FOR %-1 TO 5000 

40 NEXT 

50 CLEAR INPUT 

run 


COMMAND: Discards all previously typed input from the keyboard, still in the 
keyboard buffer. 


To see the effect of this command, RUN the above program and type in letters when 
asked to do so. Then delete line 58 of the program and RUN again, noting the 
difference. 


Associated keywords: INKEY, INKEY$, JOY 


CLG 
CLG[ink] 


LOCATE 1,20 
CLG 3 


COMMAND: CLears the Graphics screen to the graphics paper colour. If the ink: is 
specified, the graphics paper is set to that value. 


Associated keywords: CLS,GRAPHICS PAPER, ІМК, ОКІСІМ 
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CLOSEIN 
CLOSEIN 
CLOSEIN 
COMMAND: C L0SEsany INput file from disc. (See ОРЕМІМ). 
Associated keywords: EOF, OPENIN 


CLOSEOUT 
CLOSEOUT 
CLOSEOUT 
COMMAND: CLOS Es any ОИ Три file todisc. (See OPENOUT). 
Associated keywords: OPENOUT 


CLS 
CLS[#.stream expression-] 


10 PAPERH2,3 
20 cLs#2 
run 


COMMAND: С Lears the given Screen stream (window) to its paper ink. If no «stream 
expression is given, screen stream # Ø is cleared. 


Associated keywords: CLG, INK, PAPER, WINDOW 


CONT 
CONT 
CONT 


COMMAND: CONTinues program execution, either after the [ESC] key has been 
pressed twice, or after a STOP command has been encountered in the program. 
CONT will only continue to execute the program if it has not been altered, and if it is 
nota protected program. 


Direct commands may be entered before C ON Tinuing. 
Associated keywords: S TOP. 
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COPYCHR$ 
COPYCHRS ( # stream expression: ) 


18 CLS 

20 PRINT "top corner" 
30 LOCATE 1,1 

40 aS-COPYCHRSCAO) 

50 LOCATE 1,20 

60 PRINT a$ 

run 


FUNCTION: COPies а CHaRacter from the current position in the stream (which. 
MUST be specified). The above program copies a character from location 1,1 (top left), 
and reproduces it at location 1,20. 


Ifthe character read is not recognised, a null string is returned. 
Associated keywords: LOCATE 


cos 
COS («numeric expression: ) 


DEG 
PRINT. COS(45) 
0.707106781 


FUNCTION: Calculates the C 0 Sine of the numeric expression:. 


Note that DEG and RAD can be used to force the result of the above calculation to 
degrees or radians respectively. 


Associated keywords: АТМ, DEG, RAD, SIN 


CREAL 


CREAL («numeric expression: ) 


10 а=РІ 

20 PRINT CINT(a) 
3@ PRINT CREAL(a) 
run 


3 

3.14159265 
FUNCTION: Returns the value of the numeric expression», Converting itto REAL. 
Associated keywords: CINT 
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CURSOR 
CURSOR [system switch» [Г , user switch] 


1@ CURSOR 1 
20 PRINT “question? 
30 a$-INKEYS:IF a$ 
40 PRINT a$ 
50 CURSOR @ 


THEN 30 


COMMAND: Sets the system switch or the user switch to the cursor, on or off, The 
«system switch» and «user switch, parameters must be either @ (off) or 1 (on). In the 
above INKEY$ command, where the cursor is not normally visible, the cursor has 
been turned on by the «system switch: setting of 1 (in line 10). 


The cursor is displayed whenever both the «system switch» and the «user switch are 
on (1). The «system switch» is automatically turned on for the command INPUT, but 
is turned off for INKEYS. 


It is recommended that the cursor be turned off when printing text to the screen, 


Either switch parameter may be omitted, but not both. If a switch parameter is 
omitted, that particular switch state is not changed. 


Associated keywords: LOCATE 


DATA 
DATA «list of::constant» 


10 FOR x=1 TO 4 

20 READ name$,surname$ 
30 PRINT "Mr. ";name$; 
40 NEXT 

50 DATA Ken,Barlow,Alf,Roberts 

60 DATA Mike,Baldwin,Jack,Duckworth 


;Surname$ 


COMMAND: Declares constant data for use within a program. Data may be read into 
the variable by the READ command, after which the ‘pointer’ moves on to the next 
item in the DATA list. The RESTORE command may be used to move the pointer toa 
specified DAT A position. 


Further information concerning data will be found in part 2 of the chapter entitled 
‘At your leisure....’. 


Associated keywords: READ, RESTORE 
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DEC$ 


DECS$ (.numeric expression, , format template: ) 


PRINT DECSCTO T7," ££HBEHHHHHH, HH") 
£10,002,000.00 


FUNCTION: Returns a DE Сіта! string representation of the «numeric expression’, 
using the specified «format template: to control the print format of the resulting 
string. : 


The format template may contain ONLY the characters: 
*t-f$*4,.1 


The use of these 'format field specifiers' is described under the keyword PRINT 
USING. 


Associated keywords: BINS,HEX$, PRINT USING,STR$ 


DEFFN 
DEF FN.function name/ (formal parameters: ) |-«ехргеввіоп» 


10 t=TIME/300 

20 DEF FNclock=INT(TIME/300-t) 
30 EVERY 100 GOSUB 50 

40 GOTO 40 

50 PRINT "program was run"; 
60 PRINT FNclock;"seconds ago" 
70 RETURN 

run 


COMMAND: DEFines a FuNction. BASIC allows the program to define and use 
simple value returning functions. DEF FN is the definition part of this mechanism 
and creates a program-specific function which works within the program in the same 
way that forexample COS operates as a built-in function of BASIC. 


(Note in the above example how the value of the function FNc Lock is continually 
updated even if the program is paused by pressing [ESC] once, or stopped by pressing 
[ESC] twice, then CONTinuing.) 


Associated keywords: none 
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DEFINT 
DEFINT list о letter range: 

18 DEFINT n 

20 number=123.456 

30 PRINT number 

run 

123 

COMMAND: Sets the DEFault for a variable to type INTeger. When a variable is 
encountered without an explicit type marker (! X $), the default type is assumed. 
This command sets the default for variables with the specified first letter(s) to type 
INTeger. There may bea list of first letters such as: 

DEFINT a,b,c 
„ог there may bean inclusive range of first letters such as: 

DEFINT a-z 


Associated keywords: DEFREAL, DEFSTR 


DEFREAL 
DEFREAL istof:letterrange: 

DEFREAL x,a-f 
COMMAND: Sets the DEFault for a variable to type REAL. When a variable is 
encountered without an explicit type marker (! X $), the default type is assumed. 
This command sets the default for variables with the specified first letter(s) to type 
REAL. There may bea list of first letters such as: 

DEFREAL a,b,c 
...or there may be an inclusive range of first letters such as: 


DEFREAL а-2 


Associated keywords: DEF INT,DEFSTR 


Chapter 3 Page 14 Complete List of Keywords 


DEFSTR 


DEFSTR <list of: letter range» 


1@ DEFSTR n 

28 name-"Anstrad" 
30 PRINT name 
run 

Amstrad 


COMMAND: Sets the DE Fault for a variable to type ST Ring. When a variable is 
encountered without an explicit type marker (! X $), the default type is assumed. 
This command sets the default for variables with the specified first letter(s) to type 
STRing. There may be a list of first letters such as: 

DEFSTR a,b,c 
...or there may be an inclusive range of first letters such as: 

DEFSTR a-z 


Associated keywords: DEF INT, DEFREAL 


COMMAND: Sets DEGrees mode of calculation. The default condition for the 
functions SIN, COS, TAN, and ATN is radians. DEG resets BASIC to degrees until 
instructed otherwise by the commands RAD, and NEW, CLEAR, LOAD, RUN etc. 


Associated keywords: ATN, COS, RAD, SIN, TAN 
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DELETE 
DELETE «line number range: 
DELETE 100-200 


COMMAND: Deletes part of the current program as defined in the dine number 
range expression. 


The first or last number in the (line number range: may be omitted to indicate 
‘...from the beginning of the program’, or “....to the end of the program’, i.e: 


DELETE -200 
„ёё... 

DELETE 50- 
=й} 

DELETE 


....which deletes the whole program. 


Associated keywords: CHAIN MERGE, RENUM 


DERR 
DERR 


LOAD "xyz.abc" 


XYZ .ABC not found 
Ready 

PRINT DERR 

146 


FUNCTION: Reports the last error code returned by the disc filing system. The value 
of DERR may be used to ascertain the particular Disc ERRor that occurred. See the 


listing of error messages given in the chapter entitled For your reference...’ 


Associated keywords: ERL, ERR, ERROR, ОМ ERROR GOTO,RESUME 
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DI 
bI 


10 CLS:TAG:EVERY 10 GOSUB 90 

20 X1=RND*320:X2=RND*320 

30 Y-20U*RND*20QU:CS-CHRS(RND*255) 

46 FOR Х-520-Х1 TO 320*X2 STEP 4 қ 
50 DI 

60 MOVE 320,0,1:MOVE X-2,Y:MOVE X,Y 
76 PRINT " ";CS$; :FRAME 

80 EI:NEXT:GOTO 20 

98 MOVE 320,0:DRAW X+8,Y-16,0:RETURN 


COMMAND: Disables Interrupts (other than the [ESC] interrupt) until re-enabled 
explicitly by E 1 or implicitly by the RETURN at the end ofan interrupt sub-routine. 


Note that entering an interrupt sub-routine automatically disables interrupts of an 
equal or lower priority. 


The command is used to make the program literally execute without interruption 
- for example when two routines within a program are competing for use of resources 
In the example above, the main program and the interrupt sub-routine are competing 
for use of the graphics display. 


Further information concerning logic will be found in part 2 of the chapter entitled 
‘At your leisure....’. 


Associated keywords: AF TER, EI, EVERY, REMAIN 
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DIM 


DIM list of::subscripted variable, 


18 CLS 

20 DIM friend$(5),phone$(5) 

30 FOR n-1 TO 5 

40 PRINT "Friend number";n 

50 INPUT "Enter nane";friend$(n) 
60 INPUT "Enter tel.number";phone$(n) 
70 PRINT 

80 NEXT 

90 FOR п=1 TO 5 

100 PRINT n;friend$(n),phoneS$(n) 
110 NEXT 

run 


COMMAND: р І Мепвіопв an array. DIM allocates space for arrays and specifies 
maximum subscript values. BASIC must be advised of the space to be reserved for an 
array, or it will default to 10. 


An array is identified by a «subscripted variable» where one variable name is used 
with a range of subscript numbers, so that each ‘element’ of the array has its own 
individual value. Control of the array can then be achieved by for example FOR 
NEXT loops, which can step through the array, processing each element in turn. 


Note that the lowest value of the subscript is zero (i.e. the first available element in 
thearray). 


Arrays can be multi-dimensional, and each element of such an array is referenced by 
its position within the framework ofthe array. For example, in an array dimensioned 
by: 

DIM position$(20,20,20) 
„ап element of the array would be referenced for example: 


position$(4,5,6) 


Associated keywords: ERASE 
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DRAW 


DRAW «xco-ordinate , ‹у co-ordinate) , [-ink»)[ , «ink mode]! 


10 MODE @:BORDER Q:PAPER Q:INK 0,0 
20 x-RND*64B:y-RND*4BB:z-RND*15 
30 DRAW x,y,z 

48 GOTO 20 

run 


COMMAND: Draws a line on the graphics screen, from the current graphics cursor 
position to the absolute position specified in the x,y co-ordinates. The ‹іпі in which to 
draw the line may be specified (in the range 0 to 15). 


The optional ink mode, determines how the ink being written interacts with that 
already on the graphics screen. The 4 ink modes are: 


formal 
OR (eXclusive OR) 
ND 


3:0R 
Associated keywords: DRAWR, GRAPHICS PEN,MASK 


DRAWR 
DRAWR <x offset» , y offset.[ [т , ink mode ]] 


10 CLS:PRINT "coming upstairs?" 
20 MOVE 0,350:FOR n=1 TO 8 

30 DRAWR 50,0 

48 DRAWR 0,-50 

50 NEXT:MOVE 348,0:FILL 3 

68 GOTO 68 


COMMAND: Draws а line оп the graphics screen, from the current graphics cursor 
position to the relative position specified in the «x and y offset,s. The «ink: in which to 
draw the line may be specified (in the range 0 to 15). 
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— — TPT -[ H — . ы 


The optional ink mode, determines how the ink being written interacts with that 
already on the graphics screen. The 4 ink modes are: 


9: Normal 
1: ХОК (eXclusive OR) 


2:AND 
3:0R 


Associated keywords: DRAW, GRAPHICS PEN, MASK 


EDIT 
EDIT linenumber: 


EDIT 20 


COMMAND: Displays the program line specified іп the line number» on the screen 
together with the cursor, ready for editing. 


Associated keywords: AUTO, LIST 


EI 
EI 
EI 
COMMAND: Enables Interrupts which have been disabled by the D I command. 


If interrupts are disabled in an interrupt sub-routine, they are automatically 
re-enabled when BASIC encounters the RETURN command at the end of the 
sub-routine. 


Further information concerning interrupts will be found in part 2 of the chapter 
entitled ‘At your leisure....’. 


Associated keywords: AF TER, DI, EVERY, REMAIN 


ELSE 


(See IF) 
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END 
END 
END 
COMMAND: Ends the execution of a program, and returns to direct mode. Any 
number of END commands may appear in a program, and one is automatically 


assumed after the final line ofa program. 


Associated keywords: STOP 


ENT 


ENT «envelope number»| , envelope section: || , envelope section] 
1, envelope section» || , envelope section: | 
І, envelope section. | 


10 ENT 1,10,-50,10,10,50,10 

20 SOUND 1,500,200,10,,1 

run 
COMMAND: Sets the Tone ENvelope specified in the ‹епуе1оре number, (in the 
range 1 to 15), which is used in conjunction with the SOUND command. If the 
«envelope number» is negative (in the range -1 to -15), the envelope repeats unti] the 
end of the duration ofthe SOUND command. 
Each of the (envelope section:s may contain either 2 or 3 parameters: 
If3 parameters are used, these are: 


«number of steps» , «step size, , pause time, 


Parameter 1: «number of steps: 


This parameter specifies how many different steps of tone (pitch) you want the sound 
to pass through during the envelope section. For example, in a section of a note which 
lasts 10 seconds, you may wish to have 10 tone steps of 1 second each. In such a case, 
the number of steps: parameter used should be 10. 


The available range of number of steps: is 0 to 239. 
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Parameter 2: «step size, 


This parameter must be in the range —128 to +127. Negative steps make the pitch of 
the note higher; positive steps make the pitch of the note lower. The shortest tone 
period is 0. The full range of tone periods is shown in the chapter entitled “Ғог your 
reference....". 


Parameter 3: :pause time: 


This parameter specifies the time between steps in 0.01 second (hundredths of a 
second) units. The range of «pause time: numbers is 0 to 255 (where 0 is treated ав 
256), which means that the longest time between steps is 2.56 seconds. 


If 2 parameters are used, these аге: 
«tone period» , pause time: 


Parameter 1: tone period. 


This parameter gives a new absolute setting for the tone period. (See Parameter 2 of 
the SOUND command.) 


Parameter 2: pause time: 
This parameter specifies the pausing time in 0.01 second (hundredths of a second) 


units. The range of «pause time; numbers is 0 to 255 (where 0 is treated as 256), or 
2.56 seconds. 


General 
Note that the total length of all the «pause times should not be greater than the 
«duration: parameter in the SOUND command, otherwise the sound will finish before 
all the tone steps have been passed through. (In such a case, the remaining contents of 
the tone envelope are discarded.) 

Likewise, if the «duration: parameter in the SOUND command is longer than the 
total length of all the «pause times, the sound will continue after all of the tone steps 
have been passed through, and will remain constant at the final tone pitch. 

Up to 5 different envelope section»s, (each made up of the above 2 or 3 parameters) 
may be used in an ENT command. 

The first step of a tone envelope is executed immediately. 

Each time a given tone envelope is set, its previous value is lost. 

Specifying an «envelope number: with no «envelope sections cancels any previous 
setting. 

Further information concerning sound will be found in part 2 of the chapter entitled 
'At your leisure. 


Associated keywords: ENV, SOUND 
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ЕМУ 


ЕМУ «envelope number/[ , envelope section: | , envelope section: | 
{, envelope section: ][ , envelope section] 
[envelope section: | 


10 ЕМУ 1,15,-1,10,15, 1,18 


20 SOUND 1,200,300,15,1 
run 


COMMAND: Sets the Volume ENvelope specified in the envelope number, (in the 
range 1 to 15), which is used in conjunction with the SOUND command. 


Each ofthe envelope section:s may contain either 2 or 3 parameters: 
If3 parameters are used, these аге: 


number of steps» , «step size, , pause time, 


Parameter 1: number of steps: 


This parameter specifies how many different steps of volume you want the sound to 
pass through during the envelope section. For example, in a section of a note which 
lasts 10 seconds, you may wish to have 10 volume steps of 1 second each. In such a 
case, the ‘number of steps» parameter used should be 10. 


The available range of number of steps» is 0 to 127. 


Parameter 2: «step size; 


Each step can vary in size from a volume level of 0 to 15 with respect to the previous 
step. The 16 different volume levels are the same as those you will hearin the SOUND 
command. However, the «step size» parameter used can be between —128 and +127; 
the volume level re-cycling to 0 after each 15. 


Parameter 3: pause time» 


This parameter specifies the time between steps in 0.01 second (hundredths of a 
second) units. The range of «pause time: numbers is 0 to 255 (where 0 is treated as 
256), which means that the longest time between steps is 2.56 seconds. 
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If2 parameters are used, these are: 


*hardware envelope: , «envelope period: 


Parameter 1: hardware envelope; 

This parameter specifies the value to send to the envelope shape register of the the 
sound chip. 

Parameter 2: envelope period, 


This parameter specifies the value to send to the envelope period registers of the 
sound chip. 


Knowledge of hardware is assumed when using hardware envelopes. Unless you 


have such knowledge, it is suggested that you use a software envelope incorporating 
asuitable .pause time, parameter. 


General 

Note that the total length of all the «pause times should not be greater than the 
“duration, parameter in the SOUND command, otherwise the sound will finish before 
all the volume steps have been passed through. (In such a case, the remaining 
contents of the volume envelope are discarded.) 

Likewise, if the «duration: parameter in the SOUND command is longer than the 
total length of all the .pause times, the sound will continue after all of the volume 
steps have been passed through, and will remain constant at the final level. 


Up to 5 different envelope sections, (each made up of the above 2 or 3 parameters) 
may be used in an ENV command. 


The first step of a volume envelope is executed immediately. 
Each time a given volume envelope is set, its previous value is lost. 


Specifying an «envelope number, with no envelope sections cancels any previous 
setting. 


Further information concerning sound will be found in part 2 of the chapter entitled 
‘At your leisure....’. 


Associated keywords: ENT, SOUND 
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EOF 


10 OPENIN "ex1.bas" 
20 WHILE NOT EOF 

30 LINE INPUT #9,а$ 
40 PRINT a$ 

50 WEND 

60 CLOSEIN 


FUNCTION: Tests to see if the disc input is at End Of File. Returns -1 (true) if no file 
is open or file is at the end, otherwise returns 0 (false). 


Associated keywords: OPENIN, CLOSEIN 


ERASE 


ERASE list of::variable name, 


DIM а(100),55(100) 
ERASE a,b$ 


COMMAND: Erases the contents of an array no longer required, reclaiming the 
memory for other use. 


Associated keywords: DIM 


ERL 


10 ON ERROR GOTO 30 

20 GOTO 1008 

30 PRINT "error is іп line";ERL 
40 END 

run 


FUNCTION: Reports the Line number of the last E Rror encountered. In the above 
example you will see that the error is in line 20, and has been reported so by the ERL 
function. 


Associated keywords: DERR, ERR, ERROR, ОМ ERROR GOTO, RESUME 
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ERR 
ERR 


GOTO 500 

Line does not exist 
Ready 

PRINT ERR 

8 


FUNCTION: Reports the number of the last ERRor encountered. See the listing of 
error messages given in the chapter entitled ‘For your reference....'. In the above 
example you will see that Е В Вог number 8 isa‘Line does not exist'error. 


Associated keywords: РЕКЕ, ERL, ERROR, ОМ ERROR GOTO, RESUME 


ERROR 


ERROR «integer expression» 


10 IF INKEY$-"" THEN 10 ELSE ERROR 17 
run 


COMMAND: Invokes the error specified in the integer expression». A listing of error 
messages 1 to 32 is given in the chapter entitled For your reference....'. BASIC will 
treat the ERROR as if it had been detected as genuine, and will jump to any error 
handling routine, as well as reporting the appropriate values of ERR and ERL. 


ERROR accompanied by an «integer expression: in the range 33 to 255 can be used to 
create customised error messages, as shown in the following example: 


10 ON ERROR GOTO 100 

20 INPUT "enter one character";a$ 
30 IF LEN(a$)«»1 THEN ERROR 100 
40 GOTO 20 

100 IF ERR-100 THEN 110 ELSE 130 
110 PRINT CHR$(7) 

120 PRINT "I said ONE character!" 
130 RESUME 20 

run 


Associated keywords: ERL, ERR, ОМ ERROR GOTO,RESUME 
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EVERY 
EVERY -time регїо@.[ , timer number>] 60 SUB -line number 


10 EVERY 50,1 GOSUB 30 
20 GoTo 20 

30 SOUND 1,20 

40 RETURN 

run 


COMMAND: Calls a BASIC sub-routine at regular intervals. The «time period: 
specifies the interval in units of 0.02 (fiftieths) second. 


The timer number: (in the range 0 to 3) specifies which of the four delay timers areto 
be used. Timer 3 has the highest priority; timer 0 (the default timer) has the lowest. 


Each of the timers may have a sub-routine associated with it. 


Further information concerning interrupts will be found in part 2 of the chapter 
entitled ‘At your leisure....’. 


Associated keywords: AFTER, REMAIN 
EXP 


EXP (numeric expression: ) 


PRINT EXP(6.876) 
968.743625 


FUNCTION: Calculates “Е to the power given in the numeric expression», where ‘Е’ 
is approximately 2.7182818 - the number whose natural logarithm is 1. 


Associated keywords: LOG 


FILL 

FILL: ink, 
10 MODE 1:sea-2:MOVE 0,200,5 
20 DRAWR 100,-100:DRAWR 220,0 
30 MOVER 10,0:DRAWR 220,0 
40 DRAWR 100,100:MOVE 0,0 


50 FILL sea 
run 


COMMAND: Fills an arbitrary area of the graphics screen. The edges of the area are 
bounded by lines drawn either in the current graphics pen ink or in the ink being used 
to fill (in the range 0 to 15). 


The fill starts from the current graphics cursor position, If this position lies on an 
edge, nothing will be filled. 


Associated keywords: GRAPHICS PEN 
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FIX 
FIX(numeric expression: ) 
PRINT FIX(9.99999) 
9 
FUNCTION: Removes the part of «numeric expression: to the right of the decimal 
point, rounding towards zero. 
Associated keywords: CINT, INT, ROUND 


FN 
(See DEF FN) 


FOR 
FOR «simple variable; = ‹вбатф ТО «end» [STEP .size:] 


10 FOR п=2 TO 8 STEP 2 

20 PRINT n; 

38 NEXT n 

48 PRINT ",who do we appreciate?" 
run 


COMMAND: Carries out the body of program between the FOR and NEXT 
commands, a given number of times, stepping the control variable between a «start» 
and «end» value. Ifthe S T E P «size» is not specified, 1 is assumed. 


The STEP «size» may be specified as a negative «numeric expression» in which case 
the value of the «start» parameter must be greater than that of the end» parameter, 
otherwise the control variable will not be stepped. 


FOR NEXT loops may be 'nested', i.e. one may be carried out within another, within 
another, and soon. 


Assigning the variable's name to the NEXT command is optional as BASIC will 
automatically find which FOR command is to be associated with an ‘anonymous’ 
NEXT. 


Associated keywords: NEXT, STEP, TO 
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FRAME 
10 MODE @ 
20 PRINT "FRAME off" 
30 TAG 
40 MOVE 0,200 
50 FOR TO 588 STEP 4 


60 IF f-1 THEN FRAME 
70 MOVE х,200 

80 PRINT " ";CHRS(143); 
90 NEXT 

100 IF f-1 THEN RUN 
118 CLS 

120 TAGOFF 

130 PRINT "FRAME on" 
140 4-1 

150 6070 30 


COMMAND: Synchronises the writing of graphics on the screen, with the frame 
flyback of the display. The overall effect of this is that character or graphics 
movement on the screen will appear to be smoother, without ‘flickering’ or ‘tearing’, 


Associated keywords: TAG, TAGOF F 


FRE («numeric expression: ) 
FRE ( string expression.) 


PRINT FRE(0) 
PRINT FRE(C"") 


FUNCTION: Establishes how much F REe memory remains unused by BASIC. The 
form FRE ("") forces a ‘garbage collection’ before returning a value for available 
space. 


Associated keywords: HIMEM, MEMORY 
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GOSUB 
GOSUB Jine number» 

GOSUB 210 
COMMAND: 60ев to a BASIC SUB-routine by branching to the specified Jine 
number». The end of the sub-routine itself is marked by the command RETURN, 
whereupon the program continues execution from the instruction after the invoked 
GOSUB command. 


Associated keywords: RETURN 


GOTO 
GOTO Ліпе number» 
GOTO 90 
COMMAND: GOes TO a specified line number. 


Associated keywords: none 


GRAPHICS PAPER 
GRAPHICS PAPER «пк» 


10 MODE 0 

20 MASK 15 

36 GRAPHICS PAPER 3 
40 DRAW 640,0 

run 


COMMAND: Sets the ink- ofthe graphics paper, i.e. the area behind graphics drawn 
on the screen. When drawing continuous lines, the graphics paper will not be seen. In 
the above example, the MASK command enables a broken line to be drawn, and the 
graphics paper to be seen. 


The graphics paper's ink (in the range 0 to 15) is used for the ‘paper’ area of characters 
written when TAG is in operation, and as the default when clearing the graphics 
window, using CLG. 


Associated keywords: CLG, GRAPHICS PEN, INK, MASK, TAG, TAGOFF 
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GRAPHICS PEN 


GRAPHICS PEN [<ink>][,.background mode] 


10 MODE 0 

20 GRAPHICS PEN 15 
30 MOVE 200,0 

40 DRAW 200,400 
50 MOVE 639,0 

68 FILL 15 

run 


COMMAND: Sets the «ink», (in the range 0 to 15) to be used for drawing lines and 
plotting points. The graphics ‘background mode» can also be set to either: 


0: Opaque background 
1:Transparent background 


(Transparent background affects the graphics paper of characters written with TAG 
on, and the gaps in dotted lines.) 


Either parameter may be omitted, but not both. If a parameter is omitted, that 
particular setting is not changed. 


Associated keywords: GRAPHICS PAPER, INK, MASK, TAG, TAGOFF 


HEX$ 
НЕХ$ («unsigned integer expression [ , field width:]) 


PRINT НЕХ$ (255,4) 
DOFF 


FUNCTION: Produces a $tring of HE Xadecimal digits representing the value of the 
«unsigned integer expression: using the number of hexadecimal digits instructed by 
the field width: (in the range 0 to 16). If the number of digits instructed is too great, 
the resulting expression will be filled with leading zeros; if the number of digits 
instructed is too small, the resulting expression will NOT be shortened to the 
instructed number of digits, but will be produced in as many digits as are required. 


The «unsigned integer expression: to be converted into hexadecimal form must yield 
avalue in the range —32768 to 65535. 


Associated keywords: BINS, DECS, STR$, UNT 
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НІМЕМ 
НІМЕМ 


PRINT НІМЕМ 
42619 


FUNCTION: Returns the address of the HIghest byte of MEMory used by BASIC, 
(which may be altered by the MEMORY command). 


Associated keywords: FRE, MEMORY, SYMBOL, SYMBOL AFTER 


IF 
ІР dogical expression: THEN «option part, [E LS E option part] 


10 MODE 1 

28 х=СІМТСЕМО* 100) 

30 PRINT "Guess my number (Ø to 100)" 
40 INPUT n 

50 IF n«x THEN PRINT n;"is too low..." 
60 IF n»x THEN PRINT n;"is too high. 
70 IF n=x THEN 80 ELSE с-с%1:6070 40 
80 PRINT "Well done, you got it in"; 
98 PRINT c*1;"guesses!" 


COMMAND: Determines whether the logical expression is true, in which case the 
first «option part, is executed. If the «logical expression» is false, any «option part, 
specified in the E L S E clause is executed, otherwise BASIC passes onto the next line. 


IF THENcommands may be nested to any depth, and are terminated by end of line. 
Therefore it is NOT possible to have further statements which are independent of the 
IF THEN command, оп the same line. 


Where the result of the «logical expression: requires that a line should be jumped to, 
thecommand may be given as either: 


Examples... 
IF a=1 THEN 108 
m 
IF a=1 GOTO 188 е 
мог... 
IF a=1 ТНЕМ GOTO 100 
Associated keywords: ELSE, GOTO, THEN 
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INK 
INK ink , colour , colour> 


10 MODE 1:PAPER @:PEN 1 
20 FOR TO 1 

38 FOR TO 26 

40 INK p,i 

50 LOCATE 16,12:PRINT "ink";p;",";i 
60 FOR t=1 TO 400:МЕХТ t,i,p 

78 INK 0,1:1NK 1,24:CLS 


COMMAND: Assigns colour(s) to a given ink. The «ink» parameter describes the ink 
reference, which must be an integer expression in the range 0 to 15, for use in the 
appertaining PEN or PAPER command. The first «colour: parameter should be an 
integer expression yielding a colour value in the range 0 to 26. If an optional second 
«colour» is specified, the ink alternates between the two colours, at a rate determined 
bythe SPEED INKcommand. 


Depending upon the current screen mode, a number of INKs are available. See the 
table of colour values given in Foundations 8, table 1. 


Associated keywords: GRAPHICS PAPER, GRAPHICS PEN, PAPER, PEN, 
SPEED INK 


INKEY 
INKEY (integer expression) 


10 IF INKEY(55)<>32 THEN 18 

20 PRINT “You've pressed [SHIFT] and V" 
30 CLEAR INPUT 

run 


FUNCTION: INterrogates the KE Yboard to report which keys are being pressed. 
The keyboard is scanned every 0.02 (fiftieth) second. 


The function is useful for spotting whether a certain key is down or up, by detecting 
the returned value of — 1 (which occurs regardless of [SHIFT] and [CTRL] key status). 


The above example detects when [SHIFT] and V (key number 55) are pressed together, 
then ends the program. An illustration of key numbers will be found in the diagram 
at the top right hand side of the computer, and in the chapter entitled ‘For your 
reference....’. 
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The state of [SHIFT] and [CTRL] іп conjunction with the key specified in the ¿integer 
expression is identified as follows: 


Value returned [SHIFT] [CTRL] specified key 
1 UP/DOWN UP/DOWN UP 

0 UP UP DOWN 

32 DOWN UP DOWN 

128 UP DOWN DOWN 

160 DOWN DOWN DOWN 


Associated keywords: CLEAR INPUT, ТМКЕ\ $, JOY 


INKEY$ 
INKEYS 


10 CLS 
20 PRINT "Select Yes or No (Y/N)?" 


68 ІР a$-"n" 
78 GOTO 30 
80 PRINT "You have selected YES":END 
90 PRINT "You have selected NO" 


FUNCTION: INterrogates the KE Yboard, returning the current String reflecting 
any key that is pressed. If no key is pressed, INKE Y $ returns an empty string. In the 
above example, lines 40 and 70 tell the program to loop back to line 30 after 
interrogating the keyboard string. 


Associated keywords: CLEAR INPUT,INKEY 


INP 
INP («port number: 


PRINT INP(&FF77) 
255 


FUNCTION: Returns the INPut value from the I/O address specified in the «port 
number. 


Associated keywords: OUT, WAIT 
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INPUT 


ІМРУТІЙ вітезт expression» , || ; ll-quoted ѕігіпа ‹ѕерагаќог- | 
list of:.variable 


10 MODE 1 

20 INPUT "Give me two numbers for multiplication, 
(separated by a comma) 

30 PRINT a;"times";b;"is 

40 GOTO 20 

run 


COMMAND: Accepts data input from the stated stream, (from stream #@ if not 
specified). 


The first, optional semicolon [; ] suppresses the carriage return/line feed that will 
otherwise occur after the command is executed. 


The separator: must either be a semicolon or comma. А semicolon causes a question 
mark to be displayed; а comma suppresses the question mark. 


Ifan entry is made that is of the wrong type such as if the letter о is typed instead of a 
@ (zero) when INPUTinga numeric variable, then BASIC will respond with: 


?Redo from start 
....and any original prompt text that you programmed. 
All responses from the keyboard must be terminated by pressing the [ENTER] key. 
Associated keywords: LINE INPUT 
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INSTR 


INSTR ([-start position» , searched string , searched for string» ) 


18 CLS:FOR n-1 TO 26 

20 alphabet$S-alphabetS*CHR$(n*64) 
36 NEXT 

40 INPUT "Enter a letter";a$ 
50 bS=UPPERS(a$) 

68 PRINT b$;" is number"; 

70 PRINT INSTR(alphabet$,b$); 
80 PRINT "in the alphabet. 
90 GOTO 40 


RINT 


FUNCTION: Searches the first «searched string» expression to find the «searched for 
string; expression, and reports the position of its first occurrence within the .searched 
string. If the «searched for string» does not occur within the «searched string», then Ø 
isreported. 

The position at which to start searching the «searched string» is optionally specifiable 
using the «start position» parameter which must yield an integer number in the range 
10255. 


Associated keywords: none 


INT 


INT ( numeric expression: ) 


PRINT INT(-1.995) 
-2 


FUNCTION: Rounds the number to the nearest smaller INTeger, removing any 
fractional part. Returns the same value as F I X for positive numbers, but returns one 
Jess than F I X for negative numbers which are not already integers. 


Associated keywords: C INT, FIX, ROUND 
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JOY 


JOY (integer expression.) 


18 PRINT "To stop the program - "; 
20 PRINT "operate joystick" 

30 IF JOY(@)<>@ THEN END 

48 GOTO 10 

run 


FUNCTION: Reads a bit-significant result from the JOYstick specified in the 
nteger expression» (either Ø or 1). 


Bit Decimal 
0:Up 1 
1: Down 2 
2: Left 4 
3: Right 8 
4:Fire2 16 
5:Fire1 32 


Hence for example, if the main ‘fire’ button (Fire 2) on the first joystick is pressed 
while the joystick handle is being moved left, the function JOY (Ø) returns а 
decimal value of 20, corresponding to 16 (Fire 2) + 4 (Left). 


Further information concerning joysticks will be found in the chapter entitled 'For 
your reference....’. 


Associated keywords: CLEAR INPUT, INKEY 


KEY 
KEY expansion token number: , «string expression: 


KEY 11,"border 13:paper @:реп 1:ink 0,13: 
ink 1,@:mode 2:list"*CHR$CT3) 


....now press the small [ENTER] key. 


COMMAND: Assigns the «string expression: to the key’s expansion token number» 
specified. Thirty-two expansion tokens are supported, in the range 0 to 31, these 
occupying the key values 128 to 159. Keys 128 (Ø on numeric keypad) to 140 ([CTRL] 
[ENTER] on numeric keypad) are by default assigned to print numbers Ø to 9, а 
decimal point, [ENTER] and RUN [ENTER] - (for cassette operation), but may be 
re-assigned to other «string expression»s as required. Expansion tokens 13 to 31 (key 
values 141 to 159) are empty strings by default, but may be be expanded and assigned 
tokeys,usingthe KEY DEF command described in the next example. 
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The «expansion token number, given in the KE Y command may be іп the range 0 to 
31, or optionally 128 to 159 to reflect the key values. (See the key illustration in the 
chapter entitled For your reference...) 


A total of 120 characters may be expanded into the «string expressions. Attempting 
toover-expand will producean‘Improper argument’ error(5). 


Associated keywords: KEY DEF 


KEY DEF 
KEY DEF «key number, , <repeat»| , normal.[ , .shifted,[ , control>]]] 


KEY.159,"this is the tab кеу" 
KEY DEF 68,1,15w 


now press the [TAB] key. 

COMMAND: DE Fines the KEY values to be returned by the specified «key number» 
in the range 0 to 79 (for an illustrauon of key numbers, refer to the diagram at the top 
right hand side ofthe computer, or to the chapter entitled ‘For your reference...."). The 
normal, «shifted», and «control: parameters should contain the values required to be 


returned when the key is pressed, alone, together with [SHIFTI. and tesether with 
[CTRL], respectively. Each of these parameters is optional. 


The «repeat: parameter enables you to set the key auto-repeat function оп or off (1 or 
Ø), the rate of auto-repeat being adjustable by use ofthe SPEED KEY command. 


In the above example, key 159 (equivalent to expansion token 31) is first assigned to 
an expansion string, thenthe KEY DEF command defines key 68 (the [TAB] key) 
to auto-repeat (1), and to return the normal value 159 when pressed alone. 
Inthe above example, normal action would be restored by: 

KEY DEF 68,8,9 
... Where 9 is the normal ASCII value for [TAB] 


Associated keywords: KEY, SPEED KEY 
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LEFT$ 
LEFTS (string expression: , required length») 


10 cLS 

20 aS-"AMSTRAD'" 

30 FOR п=1 TO 7 

40 PRINT LEFTS(a$,n) 
50 NEXT 

run 


FUNCTION: Returns the number of characters (in the range 0 to 255) specified in the 
«required length parameter, after extracting them from the LEFT of the «string 
expression». If the ‘string expression» is shorter than the -required length, the whole 
«string expression: is returned. 


Associated keywords: MID$,RIGHTS 


LEN 
LEN (.string expression: ) 


10 LINE INPUT "Enter а phrase";a$ 
20 PRINT "The phrase is"; 

30 PRINT LEN(a$);"characters long." 
run 


FUNCTION: Returns the total number of characters (i.e. the LENgth) of the «string 
expression». 


Associated keywords: none 


LET 


LET .variable,=.expression, 


LET х=100 


COMMAND: Assigns a value to a variable. À remnant from early BASICs where 
variable assignments had to be ‘seen coming’. Has no use in AMSTRAD BASIC apart 
from providing compatibility with the programs supplied in early BASIC training 
manuals. The above example need only be typed in: 


x=108 
Associated keywords: none 
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LINEINPUT 


LINE INPUT[#-stream expression: , l| ; |[-quoted string» separator} 


«string variable 
10 LINE INPUT "Type a Line of text"ja$ 
20 CLS 
30 PRINT "The variable a$ now equals:-" 
40 PRINT а$ 
run 


COMMAND: Accepts input of an entire line of text from the stream indicated, (from 
stream #0 if not specified). The first, optional semicolon [; | suppresses the carriage 
return/line feed that will otherwise occur after the command is executed. 


Тһе «separator» must either be a semicolon or comma. A semicolon causes a question 
mark to be displayed; a comma suppresses the question mark. 


LINE INPUT from the keyboard is terminated by pressing the [ENTER] key. 
LINE INPUT from disc (or cassette) stream #9 is terminated by a received carriage 
return, or by the «string variable» being assigned 255 characters, whichever is the 


воопег. 


Associated keywords: INPUT 


LIST 


LIST [line numberrange:]l , f-stream expression] 
LIST 100-1000,41 


COMMAND: Lists program lines to the given stream. Stream #@ is the default 
screen stream, and #8 is the printer. L IS Ting may be paused by pressing [ESC] 
once, and re-started by pressing the space bar. Pressing [ESC] twice will abandon the 
listing and return to direct mode. 


The first or last number in the line number range may be omitted to indicate 
‘....from the beginning of the program’, or*....tothe end of the program’, i. 


LIST -200 
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me a 
LIST 50- 

aar. eens 
LIST 

-Which lists the whole program. 


Associated keywords: none 


LOAD 
LOAD filename , address expression’) 
LOAD "discfile.xyz",&2AFB 


COMMAND: Loads a BASIC program from disc into memory, replacing any existing 
program. Specifying the optional «address expression: will cause a binary file to be 
loaded at that address, rather than the address from which it was saved. 


A Protected BASIC program can NOT be loaded using the LOAD command as it will 
be immediately deleted from memory. Instead, use the RUN or CHAIN commands. 


Associated keywords: CHAIN, CHAIN MERGE, MERGE, RUN, SAVE 


LOCATE 
LOCATE[#:stream expression: , }‹х co-ordinate» , «y co-ordinate: 


10 MODE 1 

20 FOR п=1 TO 28 

30 LOCATE n,n 

48 PRINT CHR$(143);"Location"; 
50 PRINT n;",";n 

60 NEXT 


COMMAND: Locates the text cursor at the stream indicated, to the position specified 
by the x and y co-ordinates, with 1,1 being the top left corner of the stream (window). 
Stream #0 is the default stream. 


Associated keywords: WINDOW 
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LOG 


LOG (numeric expression») 


PRINT 106(9999) 
9.21024037 


FUNCTION: Calculates the natural LOGarithm of the numeric expression, which 
mustbe greater than zero. 


Associated keywords: EXP, LOG 10 


LOG!0 


(0610 C numericexpression:) 


PRINT 10610(9999) 
3.99995657 


FUNCTION: Calculates the LOGarithm to base 10 of the numeric expression» 
which must be greater than zero. 


Associated keywords: EXP, LOG 


LOWER$ 


LOWERS (.string expression: ) 


10 a$="SEE HOW THE LETTERS CHANGE TO " 
20 PRINT LOWERS$(a$*"LOWER CASE") 
run 


FUNCTION: Returns a new string expression which is a copy of the specified «string 
expression» but in which all alphabetic characters in the range A to Z are converted to 
lower case. The function is useful for processing input which may come in mixed 
upper/lower case. 


Associated keywords: UPPERS 
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MASK [integer expression,][ , first point setting] 


10 CLS: TAG 

20 MASK 1:MOVE 0,250:DRAWR 240,0 

30 PRINT "(binary 00000001 in mask)"; 
40 MASK 3:MOVE 0,200:DRAWR 240,0 

50 PRINT "(binary 08988811 in mask)"; 
68 MASK 7:MOVE @,150:DRAWR 240,0 

70 PRINT "(binary 88008111 in mask)"; 
80 MASK 15:MOVE 0,100:DRAWR 240,0 

96 PRINT "(binary 88001111 іп mask)"; 


COMMAND: Sets the ‘mask’ or template to be used when drawing lines. The binary 
value of the «integer expression» in the range 0 to 255, sets the bits in each adjacent 
group of 8 pixels to ON (1), or OFF (0). 


The «first point setting» determines whether the first point of the line is to be plotted 
(1) or not plotted (0). 


Either of the parameters may be omitted, but not both. If a parameter is omitted, that 
particular setting is not changed. 


Associated keywords: DRAW, DRAWR, GRAPHICS PAPER, GRAPHICS PEN 


MAX 
MAX (list oft numeric expression: ) 
18 n=66 
20 PRINT MAX(1,n,3,6,4,3) 
run 
66 
FUNCTION: Returns the МА Ximum value from ће -list of: numeric expressions. 


Associated keywords: MIN 
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МЕМОВҮ 
MEMORY «address expression» 
MEMORY &20AA 


COMMAND: Allocates the amount of BASIC memory available by setting the 
address of the highest byte. 


Associated keywords: FRE, HIMEM, SYMBOL, SYMBOL AFTER 


MERGE 
MERGE filename 
MERGE "newload.bas" 


COMMAND: Loads a program from disc, and adds it to the current program in the 
memory. 


Note that line numbers in the old program which exist in the new program to be 
MERG Ed, will be over-written by the new program lines. 


Protected files, (SA VEd by „р )can NOT be ME RG Ed into the current program. 
Associated keywords: CHAIN, CHAIN MERGE, LOAD 


MID$ 
М10$ (.string expression» , start position» , sub-string length;]) 


10 MODE 1:20NE 3 

20 a$-"ENCYCLOPAEDIA" 

30 PRINT "Show me how to spell “;а5 
40 PRINT "OK....":PRINT 

58 FOR n=1 TO (ЕМ(а5) 

68 PRINT МІ05(а5,п,1), 

78 FOR t=1 TO 700:МЕХТ t,n 

88 PRINT:PRINT 

90 INPUT "Now enter another word";a$ 
108 GOTO 58 

run 
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FUNCTION: Returns а new sub-string, commencing at the «start position: of the 
«string expression», being «sub-string length: characters long. If the -sub-string 
length: parameter is not specified, the remainder of the «string expression: after the 
«start position» is returned. 


If the «start position: is greater than the total length of the «string expression», then 
an empty string is returned. The range of «start position: is 1 to 255. The range of 
«sub-string length: is 0 to 255. 


Associated keywords: LEF T$,RIGHTS 


MID$ 


MIDS ( string variable» , insertion position» , new string length:]) 


=.new string expression» 


18 a$-"hello" 

20 MID$(a$,5,2)-"XX" 
30 PRINT a$ 

run 

heXXo 


COMMAND: Inserts the «new string expression: into the string specified by the 
«string variable», commencing at the «insert position, and occupying «new string 
length: number of characters. 


Note that when using M I D$ asa COMMAND, a « Ming variable: such as a $ must be 
used, and NOT a string constant such as "hello 


Associated keywords: LEFT$, RIGHTS 


MIN 
MIN(istof: numeric expression: ) 


PRINT MIN(3,6,2.999,8,9,) 
2.999 


FUNCTION: Returns the M I Nimum value from the «list of: numeric expressions. 
Associated keywords: MAX 
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мор 


argument, MOD «argument; 


PRINT 10 MOD 3 


1 
PRINT 10 MOD 5 
4 


OPERATOR: Returns the remainder after dividing the first «argument. by the 
second argument» and removing any integer component - MO Dulus. 


Associated keywords: none 


MODE 


MODE «integer expression: 


10 m-1 

20 PRINT "this is mode";m 
30 PRINT "now press a key" 
40 IF ІМКЕҮ$="" THEN 40 
50 т=т+1:1Е m>2 THEN m=O 
60 MODE m 

70 coro 20 


COMMAND: Changes the screen mode (0,1 or 2), and clears the screen to ink 0 (which 
may not be the current paper ink). All text and graphics windows are reset to the 
whole screen, and text and graphics cursors are homed to their respective origins. 


Associated keywords: ORIGIN,WINDOW 
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МОУЕ 
MOVE -xco-ordinate: ,.y co-ordinate. ,[-ink.][ ,-ink mode:]] 


10 MODE 1:ТА6 

20 x=RND*800-100:y=RND*430 
30 МОУЕ х,у 

40 PRINT "I moved here"; 
50 GoTo 28 


COMMAND: Moves the graphics cursor to the absolute point specified by «x 
co-ordinate, and «y co-ordinate». The optional ink» parameter may be used to change 
the graphics pen ink, in the range 0 to 15. 


Тһе optional ink mode» determines how the ink to be written next, will interact with 
that already on the graphics screen. The 4 ink modes are: 

9: Normal 

1: XOR (eXclusive OR) 

2:AND 

3:0R 


Associated keywords: MOVER, ORIGIN, XPOS, YPOS 


MOVER 
MOVER «x offset. , y offset-[ ,[<ink> | , ink mode] 


18 MODE 1:TAG:MOVE 0,16 

20 PRINT "Life has its"; 

38 FOR n=1 TO 10 

40 MOVER -32,16 

50 PRINT "ups";:NEXT:PRINT " and"; 
60 FOR п=1 TO 18 

70 MOVER -64,-16 

80 PRINT "downs";:NEXT 


COMMAND: Moves the graphics cursor to a point relative to its current position. The 
relative position is specified by «x offset» and «y offset». The optional «ink: parameter 
may be used to change the graphics pen ink, in the range 0 to 15. 


The optional ink mode: determines how the ink to be written next, will interact with 
that already on the graphics screen. The 4 ink modes аге: 


0: Normal 
1:XOR (eXclusive OR) 
2:AND 


3:0R 
Associated keywords: MOVE, ORIGIN, XPOS, YPOS 
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NEW 


NEM 
NEW 


COMMAND: Deletes the current program and variables in the memory. Key 
definitions are not lost, display characteristics i.e. MODE, PEN, PAPER, INK etc, are 
not changed, and the screen is not cleared. 


Associated keywords: none 


NEXT 
NEXT [-listof-variable:] 


10 FOR а-1 TO 3 

20 FOR b=0 TO 26 

30 MODE 1 

40 PEN a:BORDER b 

50 PRINT "pen";a;"border";b 
60 FOR c-1 TO 500 

70 NEXT c,b,a 


COMMAND: Marks the end ofa F OR loop. The NEXT command may be anonymous, 
or may refer to its matching FOR. Note from the above example that the «list 
of:-variable:s must appear in reverse order to their matching F OR commands, so that 
'nested' loops do not overlap. 


Associated keywords: FOR, RESUME, STEP, TO 


NOT 

NOT argument: 
IF NOT "a "bob" THEN PRINT "correct" ELSE PRINT "wrong" 
wrong 
ІР NOT "cat'"»"dog" THEN PRINT "correct" ELSE PRINT “wrong” 


correct 


PRINT NOT -1 
B 


PRINT NOT 9 


OPERATOR: Performs bit-wise operations on integers. Inverts each bit in the 
argument. 


Further information concerning logic wili be found in part 2 of the chapter entitled 
‘At your leisure..." 


Associated keywords: AND, OR, XOR 
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ON BREAK CONT 


ON BREAK CONT 


18 ON BREAK CONT 

20 PRINT "The program will CONTinue when you try to 
*Break* using LESCI":PRINT 

30 FOR t-1 TO 1000:МЕХТ:6070 20 

run 


COMMAND: Cancels the action of the [ESC] key from stopping the program, and 
instead CONTinues execution. Care should be taken when using this command, as 
the program will continue until the computer is completely reset; hence you should 
SAVE such a program before RUNning it. 


ON BREAK CONT may bedisabled withina programby ON BREAK STOP. 
Associated keywords: ОМ BREAK GOSUB, ON BREAK STOP 


ONBREAK GOSUB 


ON BREAK GOSUB -linenumber 


10 ON BREAK GOSUB 40 

20 PRINT "program running" 

38 GOTO 20 

40 CLS:PRINT "Pressing CESC] "; 

50 PRINT "twice calls GOSUB-routine" 
60 FOR t-1 TO 2000:МЕХТ 

70 RETURN 


COMMAND: Instructs BASIC to jump to the sub-routine specified in the Jine 
number when the [ESC] key is pressed twice. 


Associated keywords: ON BREAK CONT, ON BREAK STOP, RETURN 
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ONBREAKSTOP 
ON BREAK STOP 


10 ON BREAK GOSUB 40 

20 PRINT "program running" 

30 coro 20 

48 CLS:PRINT "Pressing [ESC] "; 

50 PRINT "twice calls GOSUB-routine" 
60 FOR t=1 TO 2000:МЕХТ 

65 ON BREAK STOP 

70 RETURN 


COMMAND: Disables the ON BREAK CONT and ON BREAK GOSUB 
command, so that future operations of the [ESC] key stop the program. In the above 
example, the ON BREAK GOSUB command will operate once only, as it is then 
disabled byline 65 inthe ON BREAK sub-routine. 


Associated keywords: ON BREAK CONT, ON BREAK GOSUB 


ONERRORGOTO 
ON ERROR GOTO linenumber- 


10 ON ERROR GOTO 60 

20 CLS:PRINT “If error is found, "; 
30 PRINT "then (ist the program" 
40 FOR t=1 TO 4000:МЕХТ 

50 6070 100 

60 PRINT "Error detected in line"; 
78 PRINT ERL:PRINT:LIST 


COMMAND: Jumps to the specified line number» when an error is detected in the 
program. 


The form of the command ON ERROR GOTO Ø turns off the error trap, and 
restores normal error processing by BASIC. 


Seealsothe RESUME command. 


Associated keywords: DERR, ERL, ERR, ERROR, RESUME 
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ON «ехркеввіот» GOSUB 


ON .selector 60SUB Jistof:-line number» 


18 
20 
30 
40 
50 
60 
70 
80 
90 
102 
119 
120 
130 
140 
run 


PAPER Q:PEN 1:INK 0,1 
CLS:PRINT "MENU OF OPTIONS" 
PRINT "1 - Change PRINT 
PRINT "2 - Change PRINT 
PRINT "3 - Change mode":PRINT 
INPUT "Enter your selection";x 
ON x GOSUB 99,110,130 

вото 20 

bzb-1:1F b«Q THEN b-26 

BORDER b:RETURN 

р=р-1:1Е p«2 THEN р=26 

INK 1,p:RETURN 

m*m-1:1F m<Ü THEN m=2 

MODE m:RETURN 


COMMAND: Selects a sub-routine line to jump to, depending upon the value of the 
«selector», which should be a positive integer expression in the range 0 to 255. The 
order of the «selector: values determines the line number: to be selected from the «list 
of: line numbers. In the above example, selecting 1 makes BASIC jump to line 90, 
selecting 2jumpsto line 110, and 3jumpstoline 130. 


If the value of the «selector: is zero, or is higher than the amount of -line number;s 
listed in the command, then no sub-routine line will be selected. 


Associated keywords: RETURN 


Complete 
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ON expression; СОТО 


ON selector, GOTO dAistof:-line number» 


10 CLS:PRINT "MENU OF OPTIONS":PRINT 
20 PRINT "1 - List program" 

30 PRINT "2 - Edit and add 

40 PRINT "3 - Catalog disc 

50 INPUT "Enter your selection";n 
68 ON n GOTO 80,980,100 

78 GOTO 10 

80 LIST 

90 AUTO 

100 CAT 

run 


COMMAND: Selects a line to jump to, depending upon the value of the «selector», 
which should be a positive integer expression in the range 0 to 255. The order of the 
«selector values determines the «line number: to be selected from the -list of:-line 
numbers. In the above example, selecting 1 makes BASIC jump to line 89, selecting 
2jumps to line 98, and 3 jumps to line 100. 


If the value of the «selector» is zero, or is higher than the amount of -line numbers 
listed in the command, then no line will be selected. 


Associated keywords: none 


ONSQ GOSUB 


ON SQ (channel) GOSUB -line number. 


ЕМУ 1,15,-1,1 

ON SQ(1) GOSUB 60 

MODE 0:0в161м 0,0,200,550,100,300 
FOR x=1 TO 13:FRAME:MOVE 330,200,x 
FILL x:NEXT:GOTO 48 

READ s:IF s-Q THEN RESTORE:GOTO 60 
SOUND 1,5,25,15,1 

ON SQ(1) GOSUB 6Q:RETURN 

DATA 50,60,90,100,35,200,24,500,0 


Chapter 3 Page 82 Complete List of Keywords 


COMMAND: 60ев to a BASIC SUB-routine when there is a free slot іп the given 
Sound Queue. The channel: should be an integer expression yielding one of the 
values: 


1: for channel А 
2: for channel B 
4: for channel C 


Further information concerning sound will be found in part 2 of the chapter entitled 


‘At your leisure....’. 
Associated keywords: RETURN, SOUND, SQ 


OPENIN 
OPENIN filename: 


10 REM OPEN an INput file from disc 
20 OPENIN "datafi NPUT #9,a,a$ 
30 CLOSEIN:PRINT "The 2 values аге:" 
48 PRINT:PRINT a,a$ 

run 


COMMAND: OPENs ап I Nput file from disc, for use in the current program. The 
INput file to OP EN must Бе ап ASCII file. 


The above example will only work after you have created the file shown in the next 
example (under 0P ENOUT). 


Associated keywords: CLOSEIN,EOF 


OPENOUT 
OPENOUT filename» 


10 REM OPEN an OUTput file to disc 

20 INPUT "give me a number variable";a 
30 INPUT "give me a string variable";a$ 
4@ OPENOUT “datafile” 

50 WRITE #9,a,a$ 

60 CLOSEOUT:PRINT "Data saved onto disc" 


COMMAND: 0PENsan OUTput file to disc. 


Associated keywords: CLOSEOUT 
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м 


OR 

argument: OR «argument» 
IF “alan"<"bob" OR "dog"»"cat" THEN PRINT "correct" ELSE PRINT "wrong" 
correct 


IF "bob"«"alan" OR "cat"»"dog" THEN PRINT "correct" ELSE PRINT "wrong" 
wrong 


IF “alan"<"bob" OR "cat"»"dog" THEN PRINT "correct" ELSE PRINT "wrong" 
correct 


PRINT 1 OR 1 
1 
PRINT В OR е 


a 
PRINT 1 OR Ø 
1 


OPERATOR: Performs bit-wise boolean operation on integers. Result is 1 unless both 
argument bits are 0. 


Further information concerning logic will be found in part 2 of the chapter entitled 
‘At your leisure...’ 


Associated keywords: AND, NOT, XOR 


ORIGIN 
ORIGIN x, y), left right , top: ,-bottom.) 


10 MODE 1:8ORDER 13:TAG 

20 ORIGIN 0,0,100,540,500,100 

30 GRAPHICS PAPER 3:CLG 

48 FOR х=550 TO -310 STEP -10 

50 MOVE х,206 

60 PRINT "This is а graphics window "; 
70 FRAME:NEXT:GOTO 4@0 


COMMAND: Sets the graphics origin points 0,0 to the position specified by the 
co-ordinates x: and «y». 

А graphics window's dimensions may also be set by specifying the last four optional 
parameters. If the co-ordinates specified for the graphics window describe points 


beyond the edge of screen, then the edge of the graphics window is taken as edge of 
screen. 


Associated keywords: CLG 
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OUT 
OUT «port number, , integer expression» 
OUT &F8F4,&FF 
COMMAND: Sends the value in the integer expression» (in the range 0 to 255) OUT 
to the address specified in the «port number». 


Nota command to be used by the unwary. 


Associated keywords: INP, WAIT 


PAPER 


РАРЕК[# stream expression» , ink» 


10 MODE Q:PEN Q:INK 0,13 

28 FOR р=1 TO 15 

30 PAPER p:CLS 

48 LOCATE 7,12:PRINT "paper";p 
50 FOR t=1 TO 500:МЕХТ t,p 
run 


COMMAND: Sets the background ink for characters. When characters are written to 
the text screen, the character cell is filled with the paper «ink» (in the range 0 to 15) 
before the character is written, (unless the transparent mode has been selected). 


If the «stream expression» is omitted, the PAPER ink for stream #0 is assumed by 
default. 


The number of different P AP ER inks supported is dependent upon the screen MOD E. 
Associated keywords: GRAPHICS PAPER, INK, PEN 
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м 
РЕЕК 


PEEK (address expression: ) 


10 MODE 1:20NE 7 

20 WINDOW 1,40,1,2:WINDOW #1,1,40,3,25 
ЗВ PRINT "memory-address" 

40 LOCATE 20,1:PRINT "nmemory-contents" 
50 FOR n=0 TO 65535 

60 p=PEEK(n) 

70 PRINT 41,n," СЕ"; HEX$(m 9”; 

80 PRINT #1,TAB(20);p,"(&";HEXS(p);")" 
90 NEXT 


FUNCTION: Reports the contents of the memory location specified in the «address 
expression» which should be in the range &0000 to &FFFF (0 to 65535). In all cases 
PEEK will return the value at the RAM address specified (not the ROM), and will be 
in the range &00 to &FF (0 to 255). 


Associated keywords: POKE 


PEN 


РЕМА stream expression: , |[-ink.][ ,-background mode:] 


10 MODE Q:PAPER Q:INK 0,13 

20 FOR р=1 TO 15 

30 PEN PRINT SPACE$(47) ;"pen";p 
40 FOR t-1 TO 500:МЕХТ t,p:GOTO 20 
run 


COMMAND: Sets the «ink» (in the range 0 to 15) to be used when writing to the given 
screen stream, (stream #0 if not specified). The background mode» parameter can be 
set to transparent (1) or opaque (0). 


Either of the last 2 parameters may be omitted, but not both. If a parameter is 
omitted, that particular setting is not changed. 


Associated keywords: PAPER 


Chapter 3 Page 56 Complete List of Keywords 


РІ 


PRINT РІ 
3.14159265 


FUNCTION: Returns the value ofthe ratio between circumference and diameter of a 
circle. 


Associated keywords: DEG, RAD 


PLOT 


PLOT «xco-ordinate: , ‹у co-ordinate[ , [-ink»]f , ink mode, |] 


10 MODE 1:BORDER Q:PAPER @:РЕМ 1 

20 INK 0,0:INK 1,26:ІМК 2,13,26:DEG 
30 FOR x-1 TO 360:0RIGIN 320,200 

40 DRAW 50*COS CO ,50*SINGO,1 

50 PLOT 100*COS(x),25*SIN(x):NEXT 

60 ORIGIN Ø,øØ:t=TIME+7ØØ:WHILE TIME<t 
78 PLOT RND*64Ü,RND*&Q00:WEND 

80 PLOT RND*64Ø,RND*400,2 

98 GOTO 90 


COMMAND: Plotsa point on the graphics screen, at the absolute position specified in 
the x,y co-ordinates, The «ink: in which to plot the point may be specified (іп the range 
Oto 15). 


The optional «ink mode: determines how the ink being written interacts with that 
already on the graphics screen. The 4 «ink modes are: 


0: Normal 
1: ХОК (eXclusive OR) 
ND 


3:OR 


Associated keywords: GRAPHICS PEN,PLOTR 
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PLOTR 
PLOTR «offset, , «y offset/[ ,[-ink,][ , ink mode:]] 


10 REM use cursor keys to draw lines 
20 BORDER Q:GRAPHICS PEN 1 

30 MODE 1:PLOT 520,200 

48 IF INKEY(Q)-Q THEN PLOTR 0,1 

50 IF INKEY(1 THEN PLOTR 1,0 

60 IF INKEY(2 THEN PLOTR 8,-1 

70 IF ІМКЕҮ(8 ТНЕМ PLOTR -1,0 

80 IF ІМКЕҮ(9)-й THEN 38:REM сору=с(еаг 
90 GOTO 40 


COMMAND: Plots a pointon the graphics screen at the specified position «x offset, 
and :y offset», relative to the current graphics cursor position. The ink» in which to 
plot the point may be specified (in the range 0 to 15). 


‘The optional ink mode» determines how the ink being written interacts with that 
already on the graphics screen. The 4 ink mode»s are: 


0: Normal 

1: XOR (eXclusive OR) 
2:AND 

3:OR 


Associated keywords: GRAPHICS PEN,PLOT, 


POKE 
POKE «address expression» , integer expression» 


10 FOR m=49152 TO 65555 
20 POKE п,100 

30 МЕХТ 

run 


COMMAND: Writes the value of the «integer expression: (in the range 0 to 255) 
directly into the machine memory (RAM) at the specified «address expression». 


Nota command to be used by the unwary. 
Associated keywords: PEEK 
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POS 


P0S(#.stream expression: ) 


18 
20 
30 


MODE 1:BORDER Ø:LOCATE 8,2 
PRINT "use cursor (left/right keys" 
WINDOW 1,40,12,12:CURSOR 1,1 

FOR п=1 TO 19:PRINT CHR$(9);:NEXT 
IF INKEY(1)«»-1 THEN PRINT CHR$(9); 
IF INKEY(8)<>-1 THEN PRINT CHR$(8); 
LOCATE #1,2,24 

PRINT #1,"text cursor "; 
PRINT 41,"horizontal position 


168 PRINT 41,POS(40):GOTO 50 


run 


FUNCTION: Reports the current horizontal POSition of the text cursor relative to 
the left edge of the text window. The «stream expression: MUST be specified, and does 
NOT default to #0. 


POS (#8) reports the current horizontal carriage position for the printer, where 1 is 
theextreme left hand edge. 


Р0$ (#9) reports the logical position in the disc file stream, i.e. the number of 
printing characters sent to the stream since the last carriage return. 


Associated keywords: VPOS, WINDOW 


PRINT 


PR INT[# stream expression: , || -list of:-print items:] 


a$-"small" 

bS-"this is a larger string” 
PRINT a$;a$ 

PRINT а$,а$ 

PRINT 

PRINT b$;b$ 

PRINT b$,b$ 


COMMAND: Prints the «list of:-print item»s to the given stream, (to stream #0 if no 
«stream expression» is specified). 
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Note that when а semicolon ; is used to tell the computer to print the following «print 
item» next to the preceding item, BASIC first checks to see if the following «print 
item» can fit onto the same line. If not, it will be printed on a new line regardless of the 
semicolon. 


Note also that when a comma , is used to tell the computer to print the following 
«print item, in the next print zone, BASIC first checks to see that the preceding item 
has not exceeded the length of the current zone. If it has, the following «print item» is 
printed in a further zone. 


PRINT SPC 
PRINT TAB 


PRINT|#-stream expression , l[-list of::print item: ][ ; ] 
[SPC (integer expression: ) ][ list of:<print item>] 


PRINT[#.stream expression» , [list of:.print Цепь [; ] 
[TAB ( integer expression: ) J[-list of:«print item] 


10 PRINT "this is spc function" 
20 FOR x=6 TO 15 

30 PRINT SPC(S)"a";SPCOO"b" 

40 NEXT 

5@ PRINT "this is tab function" 
6@ FOR x=6 TO 15 

70 PRINT TAB(5)"a";TAB(x)"b" 

80 NEXT 


SPC prints the number of spaces specified in the «integer expression», and will print 
any following «print item, immediately next to the spaces, (assuming that the 
following «print item, will fit onto the line). Hence it is not necessary to terminate 
SPC withasemicolon. 


TAB prints the number of spaces relative to the left edge of the text window, and will 
print any following -print item» immediately next to the spaces, (assuming that the 
following «print Мет» will fit onto the line). Hence it is not necessary to terminate 
TAB with a semicolon. If the current position is greater than the required position, 
then a carriage return is executed, followed by spaces to reach the required position 
on the next line. 


Chapter 3 Page 60 Complete List of Keywords 


PRINT USING 


PRINT[#- stream expression» ][ list of:.print item,][; } 
[US ING format template: || separator expression} 


10 FOR x=1 TO 10 

20 n-100000* (КМ | 5) 

30 PRINT "goods";USING "JUHAHAHHHH,.HH";n 
40 NEXT 

run 


PRINT USING enables you to specify the print format of the expression returned 
by the PRINT command. This is achieved by specifying а format template» to which 
the printed result must correspond. The separator: is a comma or semicolon. The 
format template: is a string expression which is constructed using the following 
‘format field specifiers’: 


Numeric Formats 
Within the number: 


# Each # specifies a digit position. 
Example template: # # # # # # 


-  Specifiesthe position of the decimal point. 
Example template: ######.## 


(Specifies one digit position.) May appear BEFORE the decimal point only. 
Specifies that digits before the decimal point are to be divided into groups of 
three (for thousands), separated by commas. 

Example template: ННЯ, #4 


Around the number: 


££ (Specifies two digit positions.) Specifies that a £ sign be printed immediately 
before the first digit or decimal point (after any leading sign). Note that the £ 
will occupy one of the digit positions. 
Example template:£ £ 8 8 À 884 , . 84 


** (Specifies two digit positions.) Specifies that any leading spaces be replaced 1 
asterisks. 
Example template: * * 84 8888 , . 84 
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**f 


$$ 


**$ 


1111 


(Specifies three digit positions.) Acts ** and ££ options combined, i.e. 
leading * asterisks and £ sign. 
Exampletemplate: * £8 88448, . 44 


(Specifies two digit positions.) Specifies that a $ sign be printed 
immediately before the first digit or decimal point (after any leading sign). 
Notethatthe $ will occupy one ofthe digit positions. 

Exampletemplate: $$ 4 8848588 ,. i 


(Specifies three digit positions.) Acts as ** and $$ options «орай, ie. 
leading * asterisks and $ sign. 
Example template: **$######,.## 


Specifies that + or — is to be printed, as appropriate. If the + appears at the 
beginning of the template, the + sign is printed immediately before the 
the number (and any leading currency sign). If the + appears at the end of 
the template, the sign is printed after the number (and any exponent 
part). 

Example template: +####.#### 


The - sign may only appear at the END ofa template. It specifies that - is 
to be printed after any negative number (and exponent part). If the 
number is positive, a space will be printed. A - sign is printed before a 
negative number by default, unless countermanded by the use of this 
template. 

Example template: ####.####- 


Specifies that the number is to be printed using the exponent option. The 
1717 in the template should appear AFTER the digit positions, but 
BEFORE any trailing + or - sign. 

Example template: & . 88487 1 1 1+ 


The «format template. for a number may not exceed 20 characters. Numbers are 
rounded to the number of digits printed. 


Ifthe format template is too small for the input expression, for example: 


PRINT USING "####"; 12345678 


...the printed result is NOT shortened to fit the template, but is instead printed in its 
entirety, preceded by a X sign, to indicate ‘format failure’. 
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10 CLS:a$ bcdefghijklmnopqr 
20 PRINT "input expression= " 
30 PRINT:PRINT " 
4@ PRINT USING 
50 PRINT:PRINT "\spaces\ specifier= "; 
6@ PRINT USING "N 
70 PRINT:PRINT 
88 PRINT USING 
90 coro 90 


!  Specifiesthatonly the first character of the string is to be printed. 
Example template: ! 


\‹врасев›\ 
Specifies that only the first x characters of the string аге to be printed, where x 
isequaltothe length ofthe template (including the back-slashes). 
Example template: V 


& Specifiesthat the entire string isto be printed ‘as is’. 
Example template: & 


The format template» for a string may not exceed 255 characters. 


Both numeric and string «format template:s may be represented by string variables, 
for example: 


10 а ELHHHAHH, HH" 
20 Ы$="! 
30 PRINT USING a$;12345.6789; 
40 PRINT USING b$;"pence" 
run 


Further information concerning print formatting will be found in part 2 of the 
chapter entitled “At your leisure....’. 


Associated keywords: SPC, TAB, USING 
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RAD 
RAD 
RAD 


COMMAND: Sets RA Dians mode of calculation. BASIC defaults to radians when the 
computer is switched on or reset, or when the commands NEM, CLEAR, or LOAD, 
RUN, etc, are issued. 


Associated keywords: ATN, COS, DEG, SIN, TAN 


RANDOMIZE 
RANDOMIZE [.numericexpression.] 


RANDOMIZE 123.456 
PRINT RND 
0.258852139 


COMMAND: Randomizes the number ‘seed’ specified in the «numeric expression». 
BASIC's random number generator produces а pseudo-random sequence іп which 
each number depends on the previous number, commencing at a given number seed. 
The sequence is always the same. RANDOMIZE sets the new initial value for the 
random number generator either to the specified value, or to a value entered by the 
user if the numeric expression: is omitted. 


RANDOMIZE TIME produces a sequence thatis difficult to repeat. 
Associated keywords: RND 


READ 
READ .listof:- variable, 


10 FOR ns! TO 8 

20 READ a$,c 

30 PRINT a$;" ";:SOUND 1,c:NEXT 

40 DATA here,478,are,426,8,379,notes 

50 DATA 358,0f,319,a,284,musical,253,scale,239 


COMMAND: Reads data from DATA statements and assigns it to variables, 
automatically stepping the 'pointer' to the next item in the DATA statement 
afterwards. The RESTORE command can be used to return the pointer to the 
beginningofa DATA statement. 


Further information concerning data will be found in part 2 of the chapter entitled 
‘At your leisure....'. 


Associated keywords: DATA, RESTORE 
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RELEASE 


RELEASE .soundchannels; 


10 SOUND 65,1000,100 

20 PRINT "Press R to release the sound" 
38 IF INKEY(50)=-1 THEN 30 

40 RELEASE 1 

run 


COMMAND: Releases sound channels which are set to a ‘hold’ state in the SOUND 
command. 


The parameter «sound channels» must yield an integer value in the range 1 to 7, 
which operates as follows: 


: Releases channel A 

: Releases channel В 

: Releases channel А and В 

: Releases channel С 

: Releases channel А and С 

: Releases channel B and С 

: Releases channel А and B and C 


Further information concerning sound will be found in part 2 of the chapter entitled 
‘At your leisure....’. 


Associated keywords: SOUND 


RECETE T 


REM 
REM rest of line» 

10 REM Intergalatic Hyperspace Mega-Monster 

Invaders Deathchase by AMSOFT 

20 REM Copyright AMSOFT 1985 
COMMAND: Inserts a REMark into a program. The -rest of line» is ignored by BASIC, 
and may contain any characters, including colons : which normally separate 
statements. 


А single quote character ' can be used in place of : REM in all applications EXCEPT 
in DATA statements, where the ' is treated as part of an unquoted string. 


Associated keywords: none 
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REMAIN 
REMAIN (timer number: ) 


18 AFTER 500,1 GOSUB 40 

20 AFTER 100,2 GOSUB 50 

38 PRINT "program running":GOTO 38 

48 REM this GOSUB-routine will not be called 
as it is disabled in Line 88. 

50 PRINT:PRINT "Timer 1 will now be "; 

60 PRINT "disabled by REMAIN." 

70 PRINT "Time-units remaining were:"; 

80 PRINT REMAIN(1) 


FUNCTION: Returns the REMA I Ning count from the delay timer specified in «timer 
number (іп the range 0 to 3), and disables it. 


Further information concerning interrupts will be found in part 2 of the chapter 
entitled ‘At your leisure....’. 


Associated keywords: AF TER, ОТ, ЕТ, EVERY 
RENUM 


RENUM [new line number» }[ , [old line number ][ , increment; ]] 


18 CLS 

2@ REM this will be line 123 
30 REM this will be line 124 
48 REM this will be Line 125 
RENUM 123,20,1 

LIST 


COMMAND: RENUMbers program lines. 

The parameter « «old line number» specifies the current existing line number at which 
renumbering is to commence. If «old line number» is omitted, renumbering will 
commence from the beginning ofthe program. 

The parameter «new line number: specifies the new starting line number for the 


renumbered lines. If -new line number» is omitted, the renumbered program will 
start at line 10. 


The parameter «increment. specifies the numeric step between each of the 
renumbered lines. If increment» is omitted, the value of the numeric step will be 10. 


RENUM takes care of all GOSUB, GOTO and other line calls. However, line number 
references within string expressions, such as those issued іп KE Y commands, are not 
altered; neither are line references within REM statements, пог the dine number 
expression ina CHAINor CHAIN MERGE command. 

Line numbers are valid in the range 1 to 65535. 


Associated keywords: DELETE, LIST 
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RESTORE 
RESTORE [line number] 


10 READ a$:PRINT a$;" "; 

20 RESTORE 50 

30 FOR t=1 TO 500:NEXT:GOTO 10 

20 DATA restored data can be read again 
50 DATA and again 


COMMAND: Restores the position of the ‘pointer’ back to the beginning of the DATA 
statement specified in the optional -line number. Omitting this parameter restores 
the pointer back to the first DATA statement. 


Further information concerning data will be found in part 2 of the chapter entitled 
‘At your leisure....". 


Associated keywords: DATA, READ 


RESUME 
RESUME [ine number.] 


10 ON ERROR GOTO 68 

20 FOR x=10 TO 0 STEP-1:PRINT 1/х:МЕХТ 
30 END | 

40 PRINT "go here after error" 

50 END 

60 PRINT "error no.";ERR;"in Line";ERL 
70 RESUME 40 


COMMAND: Resumes normal execution of a program after an error has been 
trapped and processed by an ON ERROR GOTO command. If the «line number: to 
RESUME at is not specified, the program will re-commence execution from the same 
line in which the error was first trapped. Try removing the line number» parameter 
inthe above example, then RUN again. 


70 RESUME 
run 


Associated keywords: DERR, ERL, ERR, ERROR, ON ERROR GOTO, 
RESUME NEXT 
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RESUME NEXT 


RESUME NEXT 


10 ON ERROR GOTO 90 
20 PRINT “press CENTER] each ti 
30 INPUT "1"; 

46 INPUT 
50 inpot 
60 INPUT 
78 INPUT 
80 END 
90 PRINT "error no.";ERR;"in Line";ERL 
100 RESUME NEXT 

run 


REM syntax error! 


COMMAND: Resumes normal execution of a program after an error has been 
trapped and processed by ап ON ERROR GOTO command. 


RESUME NEXT will re-commence execution from the line after that in which the 
error was first trapped. кою бе line af 


Associated keywords: DERR, ERL, ERR, ERROR, ON ERROR GOTO,RESUME 


RETURN 
RETURN 


10 GOSUB 5@:PRINT "after the gosub":END 
50 FOR n=1 TO 20 

60 PRINT "sub-routine" 

70 NEXT:PRINT 

80 RETURN 


COMMAND: Marks the end of a sub-routine. BASIC returns from the sub-routine to 
the statement immediately after the GO S UB command which invoked it. 


Associated keywords: GOSUB 
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RIGET$ 


RIGHTS («string expression: , required length» ) 


10 MODE 1:а5-"СРС664 computer" 
20 FOR n=1 TO 15:LOCATE 41-п,п 
30 PRINT RIGHT$(a$,n) 

40 NEXT 

run 


FUNCTION: Returns the number of characters (in the range 0 to 255) specified in the 
«required length» parameter, after extracting them from the RIGHT of the «string 
expression». If the «string expression: is shorter than the «required length», the whole 
«string expression: is returned. 


Associated keywords: LEFT$,M1D$ 


RND 


RND[( numeric expression: ) | 


10 RANDOMIZE 

20 FOR x=1 TO -1 STEP - 
30 PRINT "rnd parameter 
40 FOR п=1 TO 6 

50 PRINT RND(x) 

68 NEXT n,x 


FUNCTION: Returns the next RaNDom number in sequence if the «numeric 
expression» has a positive value or is not specified. 


If the numeric expression» yields a value of zero, RND returns a copy of the last 
random number generated. 


If the numeric expression» yields a negative value, a new random number sequence 
is started, the first number of which is returned. 


Associated keywords: RANDOMIZE 
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ROUND 
ROUND ( numericexpression-[ , .decimals,]) 

10 FOR n=4 TO -4 STEP-1 

20 PRINT ROUND (1234.5678,n), 

30 PRINT “with integer expression";n 

41 NEXT 

run 
FUNCTION: Rounds the numeric expression: to a number of decimal places or 
power of ten specified in the «decimals» parameter. If decimals: is less than zero, the 
«numeric expression» is rounded to give an absolute integer with «decimals» number 
of zeros before the decimal point. 


Associated keywords: ABS, CINT, FIX, INT 


RUN 
RUN «string expression» 
RUN "rointime.dem" 


COMMAND: Loads a BASIC or binary program from disc and commences execution. 
Any previously loaded BASIC program is cleared from the memory. 


Protected BASIC programs may be run directly in this manner. 
Associated keywords: LOAD 


RUN 
RUN [dine number. | 

RUN 200 
COMMAND: Commences execution of the current BASIC program, from the 
specified line number, parameter, or from the beginning of the program if the 
parameter is omitted. RUN resets the value of all current program variables to zero or 
null. 


Protected programs may NOT be run in this manner, after loading. 
Associated keywords: CONT, END, STOP 
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SAVE 
SAVE filename , Біебуре- |І, binary parameters») 
SAVE "discfile.xyz" 
...вауез the file in normal unprotected BASIC mode. 
SAVE "discfile.xyz",P 
„saves the file in Protected BASIC mode. 
SAVE "discfile.xyz",A 
„saves the file іп ASCII mode. 
SAVE "discfile.xyz",B,8000,3000,8001 


...$aves the file in Binary mode. In this example, saves the area of the computer's 
memory starting at address 8000; the length of the file being 3000 bytes; the 
optional entry point address being 8001. 


COMMAND: Saves the program currently in the memory to disc. A Binary file 18 an 
area of memory saved to disc. The Binary parameters are: 


«start address» , file length.[ , entry point] 


The screen memory can be saved as a Binary file. This is known as a ‘screen dump’ 
and сап be performed using the command: 


SAVE "өсгееп",8,8С000,84000 
Then, to load it back onto the screen: 
LOAD "screen" 


Associated keywords: CHAIN, CHAIN MERGE, LOAD, MERGE, RUN 
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—————_—_—_—___—________________________ 
SGN 


SGN (numeric expression: ) 


10 FOR п=200 TO -200 5ТЕР-20 

20 PRINT "SGN returns"; 

30 PRINT SGN(n);"for a value of";n 
40 NEXT 

run 


FUNCTION: Determines the SiGN of the .numeric expression,. SGN returns -1 if 
numeric expression» is less than zero, returns 0 if numeric expression: equals zero, 
andreturns 1 if numeric expression: is greater than zero. 


Associated keywords: ABS 


SIN (numeric expression: ) 


10 CLS:DE 
20 FOR n 
ЗӢ y=SIN(n) 

48 PLOT n*640/720,198*y:NEXT 
50 GOTO 50 

run 


RIGIN 0,200 
TO 720 


FUNCTION: Calculates the S I Ne of the numeric expression». 


Note that DEG and RAD can be used to force the result of the above calculation to 
degrees or radians respectively. 


Associated keywords: ATN, COS, DEG, RAD, TAN 
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SOUND 


SOUND «channel status: , tone period:| , duration: [ , volume» 
L,:*volumeenvelope:| , tone envelope f , noise period» ПІ 


10 FOR z=0 TO 4095 
20 SOUND 1,2,1,12 
30 NEXT 

run 


COMMAND: Programs а sound. The command takes the following parameters: 


Parameter 1: «channel status» 


The ‘channel status, parameter must yield an integer in the range 1 to 255. The 
parameter is bit significant, with each bit of the binary value of «channel status: 
signifying the following: 


Bit 0: (decimal 1) send sound to channel A (Least significant bit) 
it 1 : (decimal 2) send sound to channel В 


lecimal 32) rendezvous with channel С 
lecimal 64) hold sound channel 
: (decimal 128) flush sound channel (Most significant bit) 


Hence a channel status: parameter of 68 for example, would mean: 


Sendtochannel C (4), with a hold state (64). 


Parameter 2: «tone period; 


This parameter defines the pitch of the sound, or in other words, ‘what note it is’ (i.e. 
do re mi fa so, etc). Each note has a set number, and this number is the «бопе period». 
See the chapter entitled ‘For your reference....’. 


Parameter 3: «duration» 


This parameter sets the length of the sound, in other words, ‘how long it lasts’. The 
parameter works in units of 0.01 (one hundredth) of a second, and if you don't specify 
the «duration», the computer will default to 20 (one fifth of a second). 
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If the «duration. parameter is zero, the sound will last until the end of the specified 
volume envelope. 


If the «duration. parameter is negative, the specified volume envelope is to be 
repeated ABS ( duration: ) times. 


Parameter 4: volume» 


This parameter specifies the starting volume of a note. The number is in the range 0 
to 15. A volume: figure of 0 is off, while 15 is maximum. If no number js specified, the 
computer will default to 12. 


Parameter 5: volume envelope» 


To make the volume vary within the duration of the note, you can specify a volume 
envelope using the separate command ENV. You can in fact create up to 15 different 
volume envelopes referenced in the range 1 to 15. The «volume envelope: parameter 
calls up the appropriate volume envelope reference number for use in the SOUND 
command. 


Refertothe description ofthe ЕМУ command. 


Parameter 6: «tone envelope» 


To make the tone or pitch vary within the duration ofthe note, you can specify a tone 
envelope using the separate command ENT. You can in fact create up to 15 different 
tone envelopes referenced in the range 1 to 15. The «tone envelope: parameter calls up 
the appropriate tone envelope reference number for use in the SOUND command. If 
you have specified a negative envelope number in the ENT command, use the 
absolute value of that number (i.e. without the negative sign) in this «tone envelope 
parameter of ће $ OUND command. 


Refer to the description of the ЕМТ command. 


Parameter 7: noise» 


Arange of white noise is available, which can be switched offor added to the sound by 
varying the «noise» parameter between 0 and 31. 


Further information concerning sound will be found in part 2 of the chapter entitled 
‘At your leisure. 


Associated keywords: ENT, ENV, ON SQ GOSUB, RELEASE, 59 
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SPACE$ 
SPACES (integer expression) 


10 MODE 1 

20 PRINT "Put 9 spaces between me"; 
30 PRINT SPACES(9 
40 PRINT "and you!" 


FUNCTION: Creates a string of spaces of the given length, (in the range 0 to 255) 
specified in the integer expression». 


Associated keywords: SPC, STRINGS, TAB 


SPC 


(See PRINT SPO) 


SPEEDINK 


SPEED INK period 1» period 2. 


10 BORDER 7,18 

20 FOR 1=30 TO 1 STEP-1 
30 SPEED INK i,i 

40 FOR t=1 TO 700:МЕХТ t,i 
run 


COMMAND: Sets the rate of alternation between two ink colours specified in an INK 
or BORDER command. «period 1. specifies the time, in units of 0.02 (fiftieths) second 
for the first colour to be used; «period 2, sets the time ‘for the second colour. 


You must exercise careful judgement to avoid mesmeric effects when selecting 
colours and repeat rates! 


Associated keywords: BORDER, INK 
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SPEED KEY 


SPEED KEY ‘start delay: , repeat period, 


18 CLS:FOR k-7 TO 1 STEP-2 

20 PRINT "type your name, then LENTERJ" 
30 SPEED KEY k,k 

40 LINE INPUT a$:NEXT 

50 PRINT "That's a funny name!" 

run 


COMMAND: Sets the rate of keyboard auto repeat. The «start delay, parameter 
specifies the time, in units of 0.02 (fiftieths) second before auto repeat starts. The 
«repeat period» parameter sets the interval between each auto repeat of a key. 


SPEED KEY will operate only on keys which auto repeat by default, or which have 
been set to autorepeatbythe KEY DEF command. 


When intending to use small values of «start delay», it is wise to pre-program one of 
the numeric keys to return the keyboard to its default SPEED KEY setting of 
30,2. This can be achieved by the command: 


KEY Q,"SPEED KEY 30,2"+СНВ$ (13) 


«Which will reset SPEED KEY to its default values when the Ø key оп the 
numeric keypad is pressed. 


Associated keywords: KEY DEF 


SPEED WRITE 


SPEED WRITE integer expression: 
SPEED WRITE 1 


COMMAND: Sets the speed at which data is to be saved or written to a cassette unit 
(if connected). The cassette can be written at either 2000 baud (bits per second) if the 
«integer expression» is 1, or at the default rate of 1000 baud if the «integer expression» 
is 0. When loading a file from tape, the computer automatically selects the correct 
reading speed as it loads. 


For higher data reliability, it is recommended that you use SPEED WRITE @ 
(default). 


The SPEED WRITE command has noeffect upon disc operation. 
Associated keywords: OPENOUT, SAVE 
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59 
SQ channel) 
18 SOUND 65,100,100 
20 PRINT SQ(1) 
run 
67 


FUNCTION: Reports the state of the Sound Queue for the specified channel, which 
must be an integer expression, yielding one of the values: 


1: for channel A 
2: for channel В 
4: for channel C 


The SQ function returns an bit significant integer, comprising the following bit 
settings: 

Bits0,1,and2 :the number of free entries in the queue 

Bits3,4,and5 : ће rendezvous state at the head of this queue 

Bit6 :thehead ofthe queue is held 

Bit7 :the channel is currently active 

..where Bit 0 is the least significant bit, and Bit 7 is the most significant bit. 


It can be seen therefore, that if Bit 6 is set, Bit 7 cannot be set, and vice versa. 
Similarly if Bits 3, 4, or 5 are set, Bits 6 and 7 cannot be set. 


Further information concerning sound will be found in part 2 of the chapter entitled 
'At your leisure....’. 


Associated keywords: ON SQ 60508, SOUND 


SQR 
SQR (numeric expression: ) 


PRINT SQR(9) 
3 


FUNCTION: Returns the S Quare Root of the specified numeric expression». 


Associated keywords: none 


Complete List of Keywords Chapter 3 Page 77 


STEP 
(See FOR) 


STOP 

STOP 
10 FOR n=1 TO 3Q:PRINT n:NEXT 
20 STOP 
30 FOR n=31 TO 60:PRINT n:NEXT 


run 
cont 


COMMAND: Stops execution of a program, but leaves BASIC in a state where the 
program can be resumed by the CONT command. S TOP may be used to interrupt the 
program ata particular point when de-bugging. 


Associated keywords: CONT, END 


STR$ 


STR$ (numeric expression: ) 


10 a-&FF :REM 255 hex 
20 b=&X1111 : REM 15 binary 


30 c$="www" 
40 PRINT cS+STRSCatb)+c$ 
run 


wee 27089 


FUNCTION: Converts the ‘numeric expression: to a decimal S Т Ring representa- 
tion. 


Associated keywords: BINS, DEC$, НЕХ$, VAL 
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STRING$ 
STRINGS (length ,.сһагасіетөресійсіег») 


PRINT STRING$(40,"*") 
лке кке а кк жа а II IIIT 


FUNCTION: Returns а string expression consisting of the specified character 
repeated the number of times (in the range 0 to 255) specified іп the length». Note 
thatthe above example could be entered as: 


PRINT STRINGS$(48,42) 
АЛКАККА IOI III III III III OSI I 


„where the «character specifier 42 refers to the ASCII value of the character * i.e. 
equivalent to PRINT STRINGS(46,CHR$(42)). 


Associated keywords: SPACES 


SWAP 
(See WINDOW SWAP) 


SYMBOL 
SYMBOL «character number: ,-list of:<row> 


18 MODE 1:SYMBOL AFTER 105 
гом1-255:КЕМ bi 11111111 

i 10000001 

10111101 

10011001 

10811081 

10111101 

10000001 

11111111 

100 PRINT "Line 110 re-defines the letter i (105). 
Type in some i's and see! Then List the program." 

110 SYMBOL 105,row1,row2,row3,row4,row5,rowó,row?,ro«8 

run 


COMMAND: Re-defines the shape of a character on the screen. Each of the 
parameters must yield an integer in the range 0to 255. == 
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To allocate space іп the CPC664's memory for a newly defined character, the 
computer must first be prepared by issuing the command: 


SYMBOL AFTER x 
-... Where x is equal to or less than the character number you wish to re-define. 
Thecommand 5 Y MBOL isthen issued, followed firstly by the character number x. 


Regardless of whether or not the value of x specifies a character which is directly 
typeable at the keyboard, the re-defined character can be printed on the screen by 
issuing the command: 


PRINT CHRS(x) 


After SYMBOL x, there are up to 8 parameters which specify the 8 individual 
horizontal rows of the character, starting from the top. Each of the parameters can be 
in the range 0 to 255. The binary representation of each of the 8 parameters 
determines the pattern of that particular row in the finished character. 


For example, if the first of the 8 parameters is 1, then the top row of the character has 
a binary representation of 00000001. Where the 1 appears, the section of the 
character is printed in the PEN colour; where a 0 appears, the section of the character 
is not visible because it is printed in the PAPER colour. Therefore the top row of this 
newly defined character has a dot in the top right hand corner. Continuing this 
example, we will specify the other 7 parameters as 3,7,15,31,63,0,0 - the 
binary representation of all 8 parameters then being: 


parameter (row) 1 : 00000001 binary : (decimal 1) 
parameter (row) 2 : 00000011 binary : (decimal 3) 
parameter (row) 3 : 00000111 binary : (decimal 7) 
parameter (row) 4 : 00001111 binary : (decimal 15) 
parameter (row) 5: 00011111 binary : (decimal 31) 
parameter (row) 6 : 00111111 binary : (decimal 63) 
parameter (row) 7 : 00000000 binary : (decimal 0) 
parameter (row) 8 : 00000000 binary : (decimal 0) 


Looking at the binary representation of the above 8 parameters, it should be possible 
to see what the shape of the new character is going to be like. Let's assign those 
parameters to character number 255 using the command: 


SYMBOL 255,1,3,7,15,31,63,0,0 
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Note that the value of 0 appearing іп the 2 final parameters means that you need 
only type in: 


SYMBOL 255,1,3,7,15,31,63 


Note that you can enter the parameters in binary to save you converting the ‘pattern’ 
of the symbol that you've created into decimal form. (Remember to use the &X binary 
prefix.) For example: 


SYMBOL 255,&X00000001,&X00000011,&X00000111, 
8Х00001111,8Х00011111,8Х00111111 


„Мох, to see the character: 
PRINT CHR$(255) 


Assigning the above parameters {0 а typeable character оп the keyboard would result 
inthenew character appearing whenever the appropriate key is pressed, or wherever 
the previous character would have been printed. Furthermore, BASIC will not reject 
this new character as incomprehensible, but will regard it as the equivalent of the 
previous character. 


Further information concerning user-defined characters will be found in part 2 of the 
chapter entitled ‘At your leisure....’. й 


Associated keywords: HIMEM, MEMORY, SYMBOL AFTER 


SYMBOL AFTER 
SYMBOL AFTER nteger expression» 


10 CLS 

20 SYMBOL AFTER 115 
ЗӢ PRINT "Line 40 re-defines the s "; 
40 SYMBOL 115,0,56,64,64,48,8,8,112 
50 PRINT "to s" 

60 PRINT "Cancel this defintion of s 
70 PRINT "by typing: SYMBOL AFTER 24 


COMMAND: Sets the number of permissible user defined characters (in the range 0 
to 256). The default setting is 240, giving 16 user defined characters (from 240 to 255). 
If the «integer expression» із 32, then all characters from 32 to 255 are re-definable. 
SYMBOL AFTER 256 permitsnocharactersto be re-definable. 


Whenevera SYMBOL AFTER command is executed, all user defined characters 
areresettotheir default conditions. 
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SYMBOL AFTER will NOT operate if invoked AFTER the value of HIMEM has 
been altered using the MEMORY command, or by the opening of a file buffer with 
OPENIN or OPENOUT. Under such circumstances, an 'Improper argument’ 
error (5) will be reported, (unless the previousstatewas SYMBOL AFTER 256). 


Further information concerning user-defined characters will be found in part 2 ofthe 
chapter entitled ‘At your leisure....’. 


Associated keywords: HIMEM, MEMORY, SYMBOL 


TAB 
(See PRINT TAB) 


TAG 
TAG[#.stream expression:] 


10 INPUT "enter your name";a$:CLS 

20 PRINT "You certainly get around ";a$ 
30 TAG 

40 x-LEN(Ca$)*17:y250*RND*300:MOVE -x,y 
50 FOR f=-x TO 640 STEP RND*7*3 

60 MOVE f,y:PRINT " ";aS;:FRAME:NEXT 
70 FOR Ь=640 TO -x ST ND*743 

80 MOVE b,y:PRINT a$;" ";:FRAME:NEXT 
90 сото 40 


COMMAND: Sends апу text specified for the given «stream expression: to be printed 
at the graphics cursor position. This allows text and symbols to be mixed with 
graphics, or moved pixel by pixel as opposed to character by character. The «stream 
expression» defaults to #0 if omitted. 


Тһе top left of the character cell is TA Gged (Text At Graphics) to the graphics cursor, 
and non-printing control characters (e.g. line feed and carriage return) will display if 
the PRINT statement is not terminated by a semicolon. 


In the default stream (#0), BASIC will switch off TAG when returning to direct 


mode. 


Associated keywords: TAGO F F 
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ТАСОҒҒ 


TAGOF Р[#‹зїгеат expression:] 


10 MODE 2:TAG :REM Text At Graphics-on 
20 year=1984:FOR x=1 TO 640 STEP 70 
30 MOVE x,400:DRAWR 0,-550 

4B year=year+1:PRINT year;:NEXT 

50 TAGOFF :REM Text At Graphics-OFF 
60 LOCATE 34,25:PRINT "Yearly figures" 
70 GOTO 70 

run 


COMMAND: Cancels TAG (Text At Graphics) for the given «stream expression: 
(stream #0 if not specified), and re-directs text to the previous text cursor position 
used before TAG was invoked. 


Associated keywords: TAG 


TAN 


TAN (numeric expression: ) 


PRINT TAN(45) 
1.61977519 


FUNCTION: Calculates the T ANgent of the «numeric expression», which must be in 
therange —200000 to +200000. 


Note that DEG and RAD can be used to force the result of the above calculation to 
degrees or radians respectively. 


Associated keywords: АТМ, COS, DEG, RAD, SIN 
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TEST 


TEST (x co-ordinate, ‚ y co-ordinate» ) 


10 CLS 

20 PRINT "You are using pen number"; 
30 PRINT TEST(10,386) 

40 PRINT "Try changing PENs and MODES"; 
50 PRINT then RUN again." 

run 


FUNCTION: Moves the graphics cursor to the absolute position specified by the «x 
and y co-ordinate»s, and reports the value ofthe ink at the new location. 


Associated keywords: MOV E, MOVER, TESTR, XPOS, YPOS 


TESTR 


TESTR (.xoffset, „гу offset») 


10 MODE B:FOR х=1 TO 15:LOCATE 1,x 
20 PEN x:PRINT STRING$(10,143); :NEXT 
30 MOVE 200,400:РЕМ 1 

40 FOR n=1 TO 23:LOCATE 12,n 

50 PRINT "реп"; ТЕЗТВ(@,-16) :NEXT 


FUNCTION: Moves the graphics cursor by the amount specified in the «x and y 
offsets relative to its current position, and reports the value of the ink at the new 
location. 


Associated keywords: MOVE, MOVER, TEST, XPOS, YPOS 


THEN 


(See IF) 
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10 CLS:REM clock 

20 INPUT "hour";hour 

ЗВ INPUT "minute";minute 

40 INPUT "second";second 

50 CLS:datum-INT(TIME/380) 

60 WHILE hour<13 

70 WHILE minute <60 

80 WHILE tick<68 

90 tick=CINT(TIME/388)-datum)+second 
100 LOCATE 1,1 

118 PRINT USING "## ";hour,minute,tick 
120 WEND 

130 tick=@:second=@:minute=minute+1 
148 GOTO 50 

150 WEND 

160 minutezÜ:hour-hour*! 

170 WEND 

180 hour=1 

190 coro 68 


FUNCTION: Reports the elapsed time since the computer was last switched-on or 
reset, (excluding periods when reading or writing to disc). 


Each second of real time is equal to the returned value: TIME / 300. 
Associated keywords: AF TER, EVERY, WEND, WHILE 


TO 
(See FOR) 
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10 TROFF:PRINT:PRINT "TRace-OFF" 
20 FOR п=1 TO 8 

30 PRINT "program running":NEXT 
40 IF 4-1 THEN END 

50 TRON:PRINT:PRINT "TRace-ON" 
60 f-1:60T0 20 


COMMAND: Traces the execution of a program by printing each line number before 
carrying it out. The line number appears inside square brackets С 1. 


TRON switches T Race ON; TROF F switches T Race OF F. 


The facility is particularly useful for studying the sequence of program line execution 
just before an error occurs. 


Associated keywords: none 


UNT 


UNT (address expression: ) 


PRINT UNT(&FF66) 

-154 
COMMAND: Returns an integer in the range —32768 to +32767 which is the 
twos-complement equivalent of the unsigned value ofthe «address expression». 


Associated keywords: CINT, FIX, INT, ROUND 


UPPER$ 


UPPERS ( «string expression: ) 

18 CLS:a$-"my, how you've grown!" 

20 PRINT UPPER$(a$) 

run 
FUNCTION: Returns a new string expression which is a copy of the specified «string 
expression: but in which all alphabetic characters in the range А to Z are converted to 
upper case. The function is useful for processing input which may come in mixed 
upper/lower case. 


Associated keywords: LOWERS 


Chapter 3 Page 86 Complete List of Keywords 


USING 
(SeePRINTUSING) 


VAL 
VAL (.string expression: ) 


10 CLS:PRINT "I know my times tables!" 
20 PRINT:PRINT "Press a key (1 to 9)" 
30 aS-INKEYS:IF a$-"" THEN 50 

40 n=VAL(a$):1F п<1 OR п>9 THEN 30 

50 FOR х=1 TO 12 
60 PRINT n;"X";x;" 
70 NEXT:GOTO 28 


"inkx 


FUNCTION: Returns the numeric VA Lue, (including any negative sign and decimal 
point) ofthe first character(s) іп the specified «string expression». 


If the first character is not a number, then 0 is returned. If the first character is a 
negative sign or decimal point followed by non-numeric characters, a ‘Type 
mismatch’ error(13) will be reported. 


Associated keywords: STR$ 


УРО5 $ 
VPOS ( #-stream expression: ) 


10 MODE 1:BORDER B:LOCATE 8,2 

20 PRINT "use cursor up/down keys" 

30 WINDOW 39,39,1,25:CURSOR 1,1 

40 LOCATE 1,13 

50 IF INKEY(Q)«»-1 THEN PRINT CHRS(11); 
60 IF ІМКЕҮ(2)<>-1 THEN PRINT CHR$(10); 
70 LOCATE #1,3,24 

80 PRINT #1,"text cursor "; 

96 PRINT #1,"vertical position ="; 

100 PRINT 41,VPOS(40):GOTO 50 

run 


FUNCTION: Reports the current Vertical РО Sition of the text cursor relative to the 
top of the text window. The «stream expression: MUST be specified, and does NOT 
default to #0. 


Associated keywords: POS, WINDOW 


Complete List of Keywords Chapter 3 Page 87 


м 


WAIT 
WALT port number, ,.mask-[ , inversion:] 
WAIT &FF34,20,25 
COMMAND: Waits until the specified 1/0 «рогі number» returns a particular value 
in the range 0 to 255. BASIC loops whilst reading the ГО port. The value read is 


eXclusive ORed with the «inversion: and then ANDed with the .mask, until a 
non-zero result occurs. 


BASIC will wait indefinitely until the required condition occurs. 
Not a command to be used by the unwary. 


Associated keywords: INP, OUT 


WEND 
WEND 
WEND 
COMMAND: Marks the end of the body of program which is to be executed within the 
УЕ loop. WEND automatically selects the WH I LE command it is to be associated 


Associated keywords: T IME, WHILE 


WHILE 


WHILE <logical expression: 


10 CLS:PRINT "Теп second timer":tzTIME 
20 WHILE TIME«t*3008 

38 SOUND 1,0,100,15 

40 WEND:SOUND 129,40,30,15 

run 


COMMAND: Repeatedly executes a body of program while a given condition is true. 
The WHILE command defines the head of the loop, and specifies the condition in the 
"logical expression». 


Associated keywords: TIME, WEND 
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WIDTH 
WIDTH integer expression: 
WIDTH 48 


COMMAND: Tells BASIC how many characters per line are to be printed when a 
printer is connected. BASIC will then send the extra carriage return/line feed at the 
appropriate time. 


The computer assumes a default value of 132 unless a W 1 D TH command is specified. 


The command WIDTH 255 suppresses the extra carriage return/line feed 
altogether, allowing printing to be "line wrapped' by the printer. Note that carriage 
return/line feed will still be generated by a PRINT command that isn't terminated 
by asemicolon or comma. 


Associated keywords: POS 


WINDOW 


WINDOW[/.stream expression: , | left, , right , top» , bottom. 


10 MODE Q:BORDER Q:REM testcard 

20 INK 0,0:INK 1,25:INK 2,23:1NK 3,21 
30 INK 4,17:INK 5,6:INK 6,2:1NK 7,26 
40 PAPER @:CLS 


50 PAPER 1:WINDOW 2,4,1,18:CLS 
60 PAPER 2:WINDOW 5,7,1,18:CLS 
70 PAPER 3:WINDOW 8,10,1,18:CLS 
80 PAPER 4:WINDOW 11,13,1,18:CLS 


96 PAPER 5:WINDOW 14,16,1,18:CLS 
108 PAPER 6:WINDOW 17,19,1,18:CLS 
119 PAPER 7:WINDOW 2,19,19,25:CLS 
128 GOTO 128 

run 


COMMAND: Specifies the dimensions of a text stream (WINDOW) on the screen. The 
values of the parameters <left>,-right>,:top», and «bottom» should correspond with the 
inclusive screen character locations consistent with the screen MODE in use. 


Ifthe «stream expression is not specified, BASIC defaults to stream #9. 


Further information concerning windows will be found in part 2 of the chapter 
entitled ‘At your leisure....’. 


Associated keywords: WINDOW SWAP 
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WINDOWSWAP 
WINDOW SWAP .stream expression» , stream expression» 


10 MODE 1:1NK 1,24:1NK 2,9:INK 3,6 
20 WINDOW 21,40,13,25:PAPER 3 

30 WINDOW 41,1,20,1,12:PAPER 41,2 
48 CLS:PRINT " window number Й" 
50 CLS #1:PRINT #1," window number 1" 
60 LOCATE 1,6 

70 PRINT " red window (0)";SPC(2) 
80 LOCATE #1,1,6 

96 PRINT #1," green window (1)" 
100 FOR t-1 TO 1000:МЕХТ 

110 WINDOW SWAP @,1:GOTO 60 

run 


COMMAND: Swaps the text window specified in the first «stream expression: with 
that specified in the second «stream expression». 


Both «stream expression:s must be specified, and in this case should NOT be preceded 
by а # stream director. 


Тһе command may be used to re-direct messages produced by BASIC, which аге 
normally always sent to stream f 0. 


Further information concerning windows will be found in part 2 of the chapter 
entitled 'At your leisure. 


Associated keywords: WINDOW 


WRITE 
WRITE [#.stream expression: , [write list] 


10 REM write variables onto disc 
20 INPUT "give me a number variable 
30 INPUT "give me a string variable 
40 OPENOUT "datafile" 

50 WRITE #9,a,a$ 

60 CLOSEOUT:PRINT "Data saved onto disc" 


COMMAND: Writes the values of the items in the «write list» to the stream specified 
in the «stream expression». Items written will be separated by commas; strings will be 
enclosed by double-quotes. 
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In this example the values of the variables which you input, аге written tostream 09 
(the disc stream). 


(То recall the values of those variables from disc, it would be necessary to use a 
program such as follows:) 


10 REM retrieve variables from disc 
20 OPENIN "datafile": INPUT #9,a,a$ 
30 CLOSEIN:PRINT “The 2 values аге:" 
48 PRINT:PRINT a,a$ 

run 


Associated keywords: INPUT, LINE INPUT 


XOR 


«argument» XOR «argument» 


IF "alan"«"bob" XOR "dog"»"cat" THEN PRINT "correct" ELSE PRINT "wrong" 
wrong 


IF "bob"«"a 
wrong 


п" XOR "cat"»"dog" THEN PRINT "correct" ELSE PRINT "wrong" 


IF "alan"«"bob" XOR "cat"»"dog" THEN PRINT "correct" ELSE PRINT "wrong" 
correct 


PRINT 1 XOR 1 
в 
PRINT B XOR в 
9 


PRINT 1 XOR 0 
1 


OPERATOR: Performs bit-wise boolean operation on integers. Result is 1 unless both 
argument bits are the same - eXclusive OR. 


Further information concerning logic will be found in part 2 of the chapter entitled 


‘At your leisure....’. 


Associated keywords: AND,OR,NOT 
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XPOS 
XPOS 
10 MODE 1:DRAW 320,200 
20 PRINT "graphics cursor X POSition="; 
30 PRINT ХРО5 
run 


FUNCTION: Reports the current horizontal (X) PO Sition ofthe graphics cursor. 
Associated keywords: MOVE, MOVER, ORIGIN,YPOS i 


YPOS 
YPOS 


10 MODE 1:DRAW 320,200 

20 PRINT "graphics cursor Y POSition="; 
30 PRINT YPOS 

run 


FUNCTION: Reports the current vertical (Y) PO Sition ofthe graphics cursor. 
Associated keywords: MOVE, MOVER, ORIGIN, XPOS 


ZONE 
ZONE integer expression: 


1@ CLS:FOR z=2 TO 20 

2@ ZONE z 

30 PRINT "X","X ZONE =";z;NEXT 
run 


COMMAND: Changes the width of the print zone (specified in PRINT statements by 
using a comma between print items). The default setting of the print zone is 13 
columns, but may be changed as specified in the «іпберег expression: in the range 1 to 
255. 


Associated keywords: PRINT 
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Chapter4 
Using discs and cassettes 


Part 1: Discs 


Making working discs 


This section discusses how to make discs to use from day to day, 
and introduces some facilities of CP/M and its Utility programs. 


Subjects covered: 


Ж Making a backup Master System/Utilities disc. 

Ж Constructing a Working Systems/Utility disc. 

* Operating with a BASIC only disc. 

Ж Installing a Turnkey AMSTRAD BASIC application. 
* Installing a Turnkey CP/M application. 


Part 7 of the Foundation course described how to format a blank system dise, which 
you can use for BASIC and games, as well as CP/M. 


Part 10 of the Foundation course showed you how to make exact copies of discs with. 
theDISCCOPY or COPYDISC programs. 


This section considers how to make discs with the programs that you want on them. 


Backup Master Disc 


It is most important to make a copy of the Master System/Utility disc provided with 
your computer, and keep the original safe - it will be very costly to replace if damaged! 
Remember that the disc supplied has two sides; the System/Utilities side and the Dr. 
LOGO side. Every disc, in fact, has two sides and you are free to use either side for any 
purposes. 

Remember that if you are using a new blank disc to copy onto, the DISC COPY and 
COPYDISC programs will format for you as well as doing the copying. 
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A working SYSTEM/UTILITY disc 


You will find that, as well as making a day-to-day copy of your Master System/Utility 
disc and Dr. LOGO disc, it is most convenient if you make a ‘working utility disc 
containing a few of the programs from your Master System/Utility disc, that you use 
the most. This will still leave plenty of room for your programs. Should you require to 
run any other utility programs, then you can always obtain them from your copy of 
the Master System/Utility disc. All the more commonly used programs will however, 
beat your fingertips. 


First use CP/M and the FORMAT program to create a new blank disc. Then use the 
CP/M program F ILECOPY to copy each program that you want onto the new disc. 
Experience will tell you which programs you'll want to have handy. In this example 
we have chosen: 


AMSDOS.COM 
FILECOPY.COM 
DISCCOPY.COM 


Using your copy of the Master System/Utilities disc as the CP/M system disc, select 
CP/M, and at the A> prompt type: 


FILECOPY FILECOPY.COM 


....and follow the displayed instructions. (The SOURCE disc is the one initially in the 
drive, and the DESTINATION disc is the new disc that you are creating). When 
copying has finished, copy the other two programs by the commands: 


FILECOPY AMSDOS.COM 
FILECOPY DISCCOPY.COM 


Once you have made one working system/utilities disc with your selection upon it, 
you can prepare the second side of that disc or both sides of other discs simply by using 
the DISCCOPY or COPYDISC programs. Take note however, of the copying 
restrictions laid down in the End User Licence Agreement, towards the end of this 
manual. 


A BASIC only disc 


Tracks 0 and 1 ofa system disc are reserved by CP/M and cannot be used by you. If you 
want to use all the space on the disc for games, programs or data in BASIC, and 
NEVER intend to use CP/M or ANY of the CP/M utilities on that disc, it can be 
formatted without the CP/M system tracks. It is then called a data disc. 
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The disc must be formatted using an option of the format program, by typing in: 
FORMAT D 


To copy programs onto this type of disc, you must use FI LECOPY (loaded from a 
system disc) or LOAD and SAVE them from BASIC. In a two drive system (i.e. if you 
have connected an additional disc drive to the computer), it is possible to use the 
CP/M utility PIP. 


The programs COPYDISC and DISCCOPY will format the destination disc to the 
same as the source. 


Turnkey AMSTRAD BASIC discs 


If you buy an application program written in AMSTRAD BASIC for the CPC664, it 
should be ready to operate when you switch on. (The expression ‘turnkey’ comes from 
the days when all small computers had a key-operated power switch). All you have to 
dois install it on a suitable working disc. 


Turnkey BASIC using disc supplied 


Simply copy the master disc with COPYDISC or DISCCOPY, preserve the master 
disc and use the copy. Follow the instructions provided to run the program. If you 
require any additional programs from your Master System/Utility disc, use 
FILECOPY totransfer them 


Turnkey BASIC onto your Working disc 

In this case copy the supplied programs onto your existing disc. 

Type: 
FILECOPY *.* 

апа follow the instructions. In particular answer М to the question: 
Ambiguous file name: Confirm individual files (Y/N) ? 


The FILECOPY program will inform you of the filenames as they are copied. You 
can then run the new application program from your upgraded working disc. 
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Turnkey СР/М Discs 


The СР/М operating system allows you to load and run an immense library of 
ftware which has already been written for personal computers that support CP/M. 
he fundamental ‘logic’ of these programs has already been devised; all that is 
required to use them on your CPC664 is to establish them on a suitable disc, and 
maybe to inform them of the particular method that the CPC664 uses to operate the 
screen, 


A set of programs on one disc designed to fulfil a specific application is called a 
‘package’. These packages are normally designed to work on а large range of different 
computers, each of which has its own size of screen and way of moving the cursor 
around. Sometimes the package you buy will have already been ‘installed’ for the 
AMSTRAD system, or cater for it by offering a menu of alternative installations. In 
these cases, simply follow the instructions provided with the software. Ifthe package 
does not have an AMSTRAD variant built in, then the section ahead entitled 
"Configuring a CP/M Program' indicates the commands that can be sent to the 
CPC664 screen to produce the sorts of effects that packages require. Normally the 
installation, or customisation, procedure will involve typing in the relevant codes 
when requested to. Again, follow the instructions provided with the package. 


The software you have purchased must be on a disc suitable for use in this system. 
Almost every different computer uses a different form of disc. Although many have 
the same size of disc, this does not necessarily mean that there is any compatibility 
between one and another in the information contained on them. Ask your supplier for 
an AMSTRAD3 inch version. 


Creating a Turnkey CP/M System disc 


It is wise to preserve the original master disc containing the new software package, 
and transport the programs to another disc. 


Although the instructions below are for the standard system with one disc drive, it is 
generally simpler to follow these instructions even if you have a 2-drive system (by 
ignoring the second drive). 


Firstly format a new system ‘Then copy all the programs from your master 
package disc using F I LE COPY from your System/Utility disc. Type: 


FILECOPY *.* 
....and follow the instructions on the screen. In particular answer N to the question: 


Ambiguous filename: Confirm individual files (Y/N) ? 
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The FILECOPY program will inform you ofthe filenames as they are copied. 


When the FILECOPY program has finished, you will have a working copy of the 
turnkey disc. If you require any Utilities, copy them from your System/ Utilities disc 
using FILECOPY 


Configuring a CP/M Program 


The CPC664 supports a wide range of control codes suitable for customising a 
software package to run with CP/M. Most data-processing and many other packages 
require to be able to print messages at any part of the screen, to accept input from any 
part of the screen and to generally understand cursor controls. 


If your package has already been customised for the AMSTRAD system, then you 
need not concern yourself further. 


Configuring the Output from the package 


The installation procedure for a package will normally consist of running a specia! 
program (often called INSTAL) which will ask a number of questions about the 
parameters of the CPC664 screen. The answers should be derived from the table 
below, which is an extract from the AMSTRAD CPC664 BASIC reference Manual 
SOFT 945: 


ValueHex Value Decimal Operation 

&07 7 Sound Bleeper 

&08 8 Move cursor back one position. 

&09 9 Move cursor forward one position. 

&0А 10 Move cursor down one line. 

&0B n Move cursor upone line. 

&0C 12 Home cursor and clear screen. 

&0D 13 Move cursor to left edge of window on 
current line. 

810 16 Deletecharacter at cursor position. 

&11 17 Clear from left edge of window to and 
including the cursor position. 

&12 18 Clear from and including the current. 
cursor position to right edge of window. 

&13 19 Clear from start of window to and 
including the current cursor position. 

&14 20 Clear from and including the current 
cursor position to end of window. 

&18 24 Toggle into/out-of inverse video. 

&1Е 30 Home cursor. 

&1F cr. 31er. Move cursor to given position in current. 
window. «c» iscolumn, normally 1 to 80, 
«r» is row, normally 1 to 25. 
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Configuring the Input to the package 


The programs in the package will expect to be able to interrogate the keyboard. Most 
of the keys on the CPC664 keyboard return standard values except for the cursor 
keys. It is possible to use the SETUP utility (see part 2 of the chapter entitled 
'AMSDOS and CP/M' to re-define the codes produced by the keyboard, although 
where possible, it is preferable for each different package to be configured to accept. 
thestandard default values. 


The column marked 'WP Value' in the table below indicates typical values which 
might be set into the keyboard via the SETUP utility in a word processing 
environment if, for example, cursor codes are required from both the cursor key 
cluster and a portion of the keyboard, and the Word Processing package is only 
capable of recognising one unique code for each operation. 


The installation procedure for a package will normally consist of asking a number of 
questions about the parameters of the CPC664 keyboard. The answers should be 
derived from the table below, which is an extract from the AMSTRAD CPC664 
BASIC reference Manual SOFT 945: 


KeyName Value Value — (Keynumberifrequired WP Value 
(Hex) (Decimal) touse SETUP utility) (Decimal) 
Cursor up &FO 240 0 5 
Cursorright  &F3 243 1 4 
Cursordown — &Fl 241 2 24 
Cursor left &F2 242 8 19 
Clr 810 16 16 7 
Return &0D 13 18 13 
Space &20 32 47 32 
Escape &FC 252 66 27 
Tab &09 9 68 9 
Del &TF 127 79 127 


Starting a Turnkey CP/M Package 


Normally all that is required, is to type the package's main program name at the А> 
prompt. For example to run a wages program called PAYROLL. COM simply type: 


PAYROLL 
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Autostarting a Turnkey CP/M Package 


lt is possible to arrange for the CP/M operating system to automatically run a 
particular program every time СР/М is entered on that particular disc. This is 
performed by one of the options in the SETUP utility program (see part 2 of the 
chapter entitled 'AMSDOS and CP/M for details). 


Part 2: Cassettes 


If you wish to use a cassette unit connected to the system, (as described in part 2 of the 
Foundation course), a number of the BASIC commands will operate differently when 
the computer is set to cassette operation by the command 1 TAPE. Various software 
messages and prompts will appear on the screen which are not seen during normal 
disc operation. 


Unlike discs, filenames on cassette do not have such strict rules concerning their 
form. They may be up to 16 characters long, and may contain embedded spaces and 
punctuation marks. [n some instances, they may be omitted altogether. 


The following list describes the DIFFERENCES in the operation of each of these 
BASIC commands. Descriptions of the commands themselves will be found in the 
chapter entitled ‘Complete list of AMSTRAD CPC664 BASIC keywords’. 


CAT 
You will be instructed: 
Press PLAY then any key: 


...whereupon you should press the PLAY button on your cassette unit, followed by 
one of the grey keys on the computer. The tape in the cassette will start turning, and 
the computer will display the names of each of the files that it finds (in sequence) on 
thecassette. 


Each of the blocks of a file will be displayed, followed by a single character which 
indicates what sort of file it is: 


$ isanunprotected BASIC file 
% isa Protected BASIC file 

ж isan ASCII file 
8 isaBinary file 
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The computer displays: 


ок 


„ай the end of the line if it has read the file successfully, indicating that the file 
would have loaded into memory, had the computer attempted to do so. 


‘The CAT function will not affect the program currently in the computer's memory. 


Ifa cassette file has been saved without a specified name, CAT will display it as: 
Unnamed file 


CAT isterminated by pressing [ESC]. 


Read errors 

Ifthe above file-reading messages are not displayed, or you get the message: 
Read error a ..or.. Read error b 

...on the screen, this indicates either of the following: 


1, Your cassette unit is not correctly connected to the computer's TAPE socket (see 
part 2 of the Foundation course). 


2. The VOLUME or LEVEL control on your cassette unit is not correctly adjusted. 
3. The tape quality is poor, or the tape is worn. 


4. The tape has been subjected to a magnetic field by being placed close to a 
loud-speaker, television set, etc. 


ж 


You аге attempting to read а cassette which has not been created for use оп 
AMSTRAD computer systems. Note that you may use all software written for 
the AMSTRAD CPC664, and most software written for the AMSTRAD 
CPC464. 
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CHAIN 

CHAIN MERGE 
LOAD 

MERGE 

RUN 


You need not specify the filename if you wish the first suitable file on the cassette to 
beloaded. Example commands: 


CHAIN "" 
CHAIN "",100 


CHAIN # 

CHAIN ",100 

CHAIN ",10Ø, DELETE 30-70 

LOAD "" 

LOAD 

MERGE "" 

RUN "" (Notethatholding down the [CTRL] key then pressing the small 
[ENTER] key on the numeric keypad, executes this command. Use 
when running cassette based software, after typing | TAPE) 

You will be instructed: 


Press PLAY then any key: 


...whereupon you should press the PLAY button on your cassette unit, followed by 
one of the grey keys on the computer. The tape in the cassette will start turning, and 
the computer will load the file to be processed. 


The screen will display the loading messages: 
Loading FILENAME block 1 


...and as many other block numbers as there are in the file, until the file is loaded. 


Ifthe first character of the filename is ! then the above messages will be suppressed, 
and you will not be required to ‘press any key’ for the file to load. (You must make sure 
that the PLAY button on your cassette unit is down.) If your programs use the ! mark 
and are also required to run on disc, the ! mark will be ignored during disc operation 
(when the disc filename is being read). Note that the ! mark does NOT occupy one of 
the character positions in the cassette or disc filename. 
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Ss 


Abandoning the command using the [ESC] key produces the error message on the 
screen: 


Broken in 


If the file does not successfully load, read the paragraph entitled ‘Read errors’ earlier 
in this section. 


WARNING: The internal disc interface occupies a small portion of the 
memory that in some cases, was used by commercial writers of cassette based 


software for the model CPC464. These cassettes will not operate properly with 
the CPC664 + Cassette unit. 


EOF 
POS(#9) 


These functions operate on cassette as per disc. 


INPUT #9 
LINEINPUT #9 
ОРЕММ and CLOSEIN 


You need not specify the filename if you wish the first suitable file on the cassette to 
be loaded. Example command: 


OPENIN "" 
You will be instructed: 

Press PLAY then any key: 
-whereupon you should press the PLAY button on your cassette unit, followed by 
one of the grey keys on the computer. The tape in the cassette will start turning, and 
the computer loads the first 2K bytes ofthe file into a portion ofthe memory called the 
‘file buffer’. Input is taken from from the file buffer until it is empty, and the computer 
again prompts: 

Press PLAY then any key: 


...and loads the next 2K bytes from the file. 
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The screen will display the loading messages: 
Loading FILENAME block 1 
„and other block numbers in turn, as the file is loaded. 


If the first character of the filename in the OPENIN command is ! then the above 
messages will be suppressed, and you will not be required to ‘press any key’ for the file 
to load. (You must make sure that the PLAY button on your cassette unit is down.) If 
your programs use the ! mark and are also required to run on disc, the ! mark will be 
ignored during disc operation (when the disc filename is being read). Note that the ! 
mark does NOT occupy one ofthe character positions in the cassette or disc filename. 


Abandoning file input using the [ESC] key produces the error message on the screen: 
Broken in 


If the file does not successfully load, read the paragraph entitled ‘Read errors’ earlier 
inthis section. 


LIST #9 
OPENOUT and CLOSEOUT 
PRINT #9 

WRITE //9 


You need not specify the filename if you wish the file to be saved as an Unnamed 
+1 Le. Example command: 


OPENOUT "" 
The first 2K bytes of the file to be saved to cassette will first be written into a portion 
of the memory called the “file buffer. When the file buffer is full, you will be 
instructed: 

Press REC and PLAY then any key: 
... whereupon you should press the RECORD and PLAY buttons on your cassette unit, 
followed by one of the grey keys on the computer. The tape in the cassette will start 
turning, and the computer saves the contents of the file buffer. The computer then 
refills the file buffer with the next 2K bytes of the file, and again prompts: 

Press REC and PLAY then any key: 


....апд saves the next 2K bytes to cassette. 
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If the file buffer is partly full and the command CLOSEOUT is encountered, the 
computer will save the remaining contents of the file buffer to cassette, issuing the 
prompt: 


Press REC and PLAY then any key: 
The screen will display the saving message: 
Saving FILENAME block «x 


If the first character of the filename in the OPENOUT command is ! then the above 
messages will be suppressed, and you will not be required to ‘press апу key’ for the file 
to save. (You must make sure that the RECORD and PLAY buttons on your cassette 
unit are down.) If your programs use the ! mark and are also required to run on disc, 
the ! mark will be ignored during disc operation (when the disc filename is being 
read). Note that the ! mark does NOT occupy one of the character positions in the 
cassette or disc filename. 


Abandoning file output using the [ESC] key produces the error message on the 
screen; 


Broken in 


Successful saving 


Toensure that the file is successfully saved: 


1. Check that your cassette unit is correctly connected to the computer's TAPE 
socket (see part 2 of the Foundation course). 


2. Check that the RECORD or LEVEL control on your cassette unit is correctly 
adjusted. 


3. Check that you are not using inferior quality cassettes or C120s. (AMSOFT C15 
cassettes are recommended.) 


4. Маке sure that your cassettes are not subjected to magnetic fields by being 
placed close to a loud-speaker, television set, etc. 


5. Before deleting a program from the memory after saving it, CA Talog the tape, 
to verify that the program has been saved successfully. 


6. Ensure that your cassette unit is periodically maintained, and that the tape 
heads are regularly cleaned. 
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SAVE 


You need not specify the filename if you wish the program to be saved as an 
Unnamed f i Le. Examplecommand: 


SAVE"" 
You will be instructed: 
Press REC and PLAY then any key: 


...Whereupon you should press the RECORD and PLAY buttons on your cassette unit, 
followed by one of the grey keys on the computer. The tape in the cassette will start 
turning, and the computer will save the program. 


The screen will display the saving messages: 
Saving FILENAME block 1 


„апа as many other block numbers as there are in the file, until the file is saved. 


If the first character of the filename is ! then the above messages will be suppressed, 
and you will not be required to 'press any key' for the file to be saved. (You must make 
sure that the RECORD and PLAY buttons on your cassette unit are down.) If your 
programs use the ! mark and are also required to run on disc, the ! mark will be 
ignored during disc operation (when the disc filename is being read). Note that the ! 
mark does NOT occupy one ofthe character positions in the cassette or disc filename. 


Abandoning the command using the [ESC] key produces the error message on the 
Screen: 


Broken in 


Read the paragraph entitled ‘Successful saving’, earlier in this section. 


SPEED WRITE 
‘The command operates only on cassette, and can be issued while the computer is set 


to disc operation. 


Error messages 


Note that error messages 7, 21, 24, 25, 27, and 32 (see the chapter entitled ‘For your 
reference....’) will be generated during cassette operation, if appropriate. 
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AMSDOS external commands 
Input and output direction to cassette or disc, is effected by the commands: 


| TAPE (which can be sub-divided into | TAPE. IN and | TAPE. OUT) 
IDISCtwhichcan be sub-divided into IDISC. INand I DISC.OUT) 


Allexternal commands: 


Are executed to disc, regardless of whether cassette operation has been selected. 
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Chapter 5 
AMSDOS and CP/M 


Part 1: AMSDOS 


Subjects covered: 


Ж Introduction to AMSDOS 

Ж Disc Directory 

Ж Changing discs 

Ж The format of file names 

Ж AMSDOS file headers 

Ж Wild cards 

Ж An example program using AMSDOS Commands 
* Reference Guide to AMSDOS Commands 

* Manipulating files 

Ж Reference guide to Error Messages 


Introduction 


AMSDOS extends the AMSTRAD BASIC supplied with your computer, by the 
addition of a number of external commands, which are identified by the preceding | 
(bar) symbol. 


AMSDOS allows the user to change discs freely, as long as no files are in use - in 
which case an error message will be displayed and there could be a loss of data if the 
open file was being written to. 


Disc Directory 


Every disc has two sections, the directory and the data area. The directory contains a 
list of all the filenames and a ‘map’ of whereabouts оп the disc each file is to be found. 
AMSDOS or CP/M can calculate the size of a particular file by inspecting its directory 
entry. Calculation of the amount of space left on a disc is made by adding up all the 
files in the directory and seeing how much remains unused. 


Whenever a file is read, its directory entry is examined, giving the disc location. 
When a new file is created, free space is allocated to it, and when a file is erased the 
space is relinquished. The directory works in units of 1K and can have up to 64 
different entries. Large files will have one entry for every 16K although normally 
this fact is hidden from the user. 
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Changing Discs 


Under AMSDOS a disc may be changed, or removed, whenever the drive is not being 
accessed, and neither the input nor output files are open on that drive. Unlike CP/M 
there is no need to ‘log in’ a disc. 

Changing a disc while it is still being written to, may corrupt the data on the disc. Ifa 
disc is changed while there are still files open on it, then as soon as AMSDOS detects 
this, all the open files on the drive will be abandoned and an error message produced. 
Any data yet to be written will be lost and the latest directory entry will not be 
written to disc. However, AMSDOS can only detect this change when it reads the 
directory, which it does every 16K of the file (and whenever a file is opened or closed). 
Thus, potentially 16K of data could be corrupted by changing a disc while there are 
still files open on it. 


AMSDOS filenames and filetypes. 


It is standard practice to name disc files in such a way that there is an indication of 
which ‘type’ they are. This naming convention DOES NOT ‘force’ the computer to use 
the file in any particular way, however some programs will only accept a file when it 
has the correct type of name. BASIC will accept any type of name, but will search in 
preference for certain file types if not otherwise specified. (See ‘AMSDOS headers’ 
ahead.) 


Construction of Filenames 


The filename is constructed from two parts with a . (dot) separating them. The first 

part can be up to 8 characters long, and the second up to 3 characters long. Thus for 

example, "ROINTIME.DEM FORMAT. СОМ” ,and"EX1.BAS" areall legal 

filenames. 

The second part of the filename is called the filetype. Filenames and filetypes can be 

composed of a mixture of letters and numbers, but cannot have embedded spaces. 

Some common conventional filetypes are: 

«space Unspecified „буре. Мау be a data file created by ап OPENOUT 
"filename." or BASIC program saved by AMSDOS using SAVE 
"filename" „А style. 


-BAS BASIC program saved by AMSDOS using SAVE "filename." or SAVE 
"filename." , P or SAVE" filename. BAS" „А styles. 


.BIN Program or area of memory saved by AMSDOS using SAVE 
" filename." „В , binary parameters: style. 


-BAK Old version of a file, where AMSDOS or a utility program has saved a 
newer version of a file using an existing name. This allows the user to 
back-track to the previous (B AcK-up) version if required. 


„сом Command file. CP/M utility programs are all ofthis filetype. 
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AMSDOS headers 


AMSDOS automatically SAVEs files with a suitable type identifier, so it is not 
normally necessary to specify one unless you wish to override the defaults described 
previously. BASIC program files, protected BASIC program files and binary files are 
saved to the disc with a header record, so that the AMSDOS command: 


LOAD "filename" 


сап recognise them and take the appropriate action. If the AMSDOS command 
LOAD cannot find a header, it assumes that the file is a program in ASCII, i.e. plain 
text. 


Notwithstanding the contents of the header, when AMSDOS is asked to LOAD a file 
where no filetype is specified, then it first looks for a file of type: 
+ Spaces 
Ifthat does not exist, it looks for a file of type: 
.BAS 
....then finally, one of type: 
«BIN 
This allows the user to abbreviate the filename, i.e. not needing to specify the 


filetype, in most instances. 


A disc data file started with the command OPENOUT and subsequently written to 
will have no header and the contents will be in ASCII, i.e. plain text, from the BASIC 
WRITE, PRINT or LIST commands. The disc command OPENIN will search for 
files in the same order as LOAD, if no file type is specified. 


Filenames on two drives 


On a two drive system, i.e. if an additional FD-1 has been connected to the computer, 
files can exist on either drive. The computer will not automatically look for a file on 
both drives,so the user must specify which drive to use. You can either employ the | A 
or | Bor | DRIVE commands (full description ahead) to select one or other drive, and 
then use a normal filename, or alternatively you can override the default drive 
assignment by specifying the drive as an A: or B: prefix to the filename. Thus, for 
example: 
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1B 
SAVE "PROG.BAS" 
ТА 


....and.... 


ТА 
SAVE "B:PROG.BAS" 


....both save the program on the additional drive, Drive В 


Similarly, you can override the default US ER assignment by specifying the USER 
number (in the range 0 to 15) as a prefix to the filename. Thus, for example: 


LOAD "15:PROG.BAS" 
„гапа... 
SAVE "15:PROG.BAS" 


„would load and save the program to the USER number 15 section of the disc, 
whatever the default US ER number setting. (See the | US ER command, ahead.) 


Finally, it is possible to override both default USER and DRIVE settings (in that 
order) by specifying them together in the prefix to the filename, for example: 


RUN "15B:PROG.BAS" 


Wild cards 


It is often required to perform some disc operation (Cataloguing, copying, erasing 
etc.) on a number of disc files. When a filename is specified for a particular operation, 
the software scans the disc directory looking for a name which exactly matches. It is 
possible, where the command allows, to perform the operation on a set of files where 
some of the characters can be 'don't саге’. This is shown by using the character ? in 
the 'don't care' position. If the whole block (or remainder of the whole block) of the 
filename or type specifier is ‘don’t care’, then the block of ?'s can be abbreviated to the 
symbol *. Thus, for example, FRED. * is shorthand for FRED. ? ? ? and F*.BAS is 


Finally, the expression * . * means ‘all files’. 
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examples: 


DIRECTORY Match *.BAS Match FRED?.BAS Match F*.BA? 
BERT.BAS BERT.BAS 

FRED1.BAS FRED1.BAS FRED1.BAS FRED1.BAS 
FRED2.BAS FRED2.BAS FRED2.BAS FRED2.BAS 
FRED3.BAK FRED3.BAK 
FRED3.BAS FRED3.BAS | FRED3.BAS FRED3.BAS 
FINISH.BAS FINISH.BAS FINISH.BAS 


Examples of Using Amsdos Commands in a program 


То give you a good understanding of the AMSDOS commands we recommend that. 
you work through the examples, referring to the relevant sections in the rest of this 
chapter as you go. DO NOT operate these programs with your original Master CP/M 
System/Utility disc installed - the program writes to the disc and you should NEVER 
risk writing to the master disc. Use a working disc or a copy instead. 


Saving variables and performing a Screen Dump 


Note the use of . DAT and . SRN filetypes. These filetypes are used to remind us of 
what is in the file, rather than because they have any inherent significance. The file 
PARAM. DAT will be an ASCII data file without a header, whilst FLAGDUMP . SRN 
is an AMSDOS Binary file with a header. The programs have been provided on your 
Master System/Utility disc in ASCII form, within the program EX1.BAS. 


This example program (EX1.BAS) draws a Union Jack flag and then saves the 
whole screen to disc. 


Note how the program deliberately tries to read from the file PARAM. DAT before 
writing to it, in order to establish if the file already exists. If the file does NOT exist, 
then an error is reported by BASIC, the error is trapped by the program, and 
execution proceeds without interruption. If the file DOES already exist, then no error 
is reported, and the program automatically asks if you wish to overwrite the existing 
file. 


Torun the program, type: 


RUN "EX1" 
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As we discussed, AMSDOS will search automatically adding the . BAS filetype for 
you. The particulars ofthe screen dump, namely the screen mode, palette colours and 
name of file containing the actual information are saved into a parameter file. This 
illustrates the use of a data file to WRITE program variables (dump f i Le$) and 
constants 1), saving them for use by another program. 


10 dumpfile$-"flagdump.srn'" 
20 MODE 1:BORDER Ø 

30 DIM colour(2) 

48 FOR i=0 TO 2 


50 READ colour(i): REM get colours from DATA statement 


60 INK 
70 NEXT 
80 ON ERROR GOTO 430 

90 OPENIN "param.dat" ' 


i,colour(i) 


test 


if file exists 


REM save filename and mode 


100 CLOSEIN:ON ERROR GOTO @ 

110 IF errnum=32 AND DERR=146 THEN CLS: 
GOTO 168 ' file doesnt exist 

120 CURSOR 1:PRINT "Do you want to overwrite 
old file? Y/N " 

130 aS=INKEYS:ON INSTR(" ҮМ" ,UPPERS(a$)) 
GOTO 130,150,140:GOTO 130 

140 PRINT a$:PRINT "Program abandoned":END 

150 PRINT a$:CURSOR Ü 

160 OPENOUT "param.dat" 

170 WRITE #9,dumpfile$,1: 

180 FOR i=@ TO 2 

190 WRITE #9,colour(i): REM save colours 

200 NEXT i 

210 CLOSEOUT 

220 CLS 

230 gp=1:GRAPHICS РЕМ gp:w-125 


15@:GOSUB 400 
GRAPHICS PEN gp 
40:у=400: 
=150:60508 400 


-40 


90: 
ORIGIN 
ORIGIN 
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10=150:60508 
-158:60508 406 
0,0,256,380,0,400:CLG 
8,0,0,640,158,250:CLG 


400 


1 
1 


158:GOSUB 400 


240:y-400:b0--150:GOSUB 400 


158:60508 400 


Continued on the next page 
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350 ORIGIN 0,0,280,552,0,400:С15 2 

360 ORIGIN 0,0,0,640,168,230:CLG 2 

370 SAVE dumpfileS,b,&CO00,&4000 

380 DATA 2,26,6 

390 END 

400 MOVE x,y:DRAWR a,b:DRAWR w,Ø:DRAWR -a,-b 
810 MOVE x*a/2*w/2,y*b/2:Flll gp 

420 RETURN 

430 errnum-ERR:RESUME NEXT 

run 


The second example (EX2 . BAS) also provided on your master disc, is a general 
purpose screen dump displaying program, using a parameter file to control its action. 
Note how variables are INPUT from the data file, with the EOF function allowing 
automatic variation in the size of the file. It is important that the screen dump 
displayed by this program was saved with the screen in a known position in memory, 
otherwise the result will be ‘skewed’. This is ensured by the saving program 
executing a MODE command and thereafter being careful not to cause the screen to 
scroll. 


10 DIM colour(15): REM Provision for 16 colours 
20 OPENIN "param.dat" 

30 INPUT #9, filename$,screenmode 
40 1=0 

50 WHILE NOT EOF 

60 INPUT #9,colour(i) 

70 INK i,colour(i) 

80 1=1+1 

90 WEND 

108 CLOSEIN 

110 MODE screenmode:BORDER @ 

120 LOAD filename$ 

run 


Summary of AMSDOS external commands 


IA 

ТА 
COMMAND: Set default drive to Drive A. Equivalent to | DRIVE with parameter 
А. (The main drive within the computer is Drive А.) 
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COMMAND: Set default drive to Drive B. Equivalent to | DRIVE with parameter 
В. (The main drive within the computer is Drive А.) 


ІСРМ 
IP] 


COMMAND: Switch to alternative disc environment by loading operating system 
from a system disc. The operating system supplied with the computer is CP/M 2.2 


This will fail if the computer's drive does not contain a system disc with CP/M. 


| DIR 
| DIRI, stringexpression.] 
IDIR,"*.BAS" 


COMMAND: Display the disc directory (In CP/M style), and free space. If the string 
expression is omitted, the wild-card * . * is assumed. 


I DISC 

1015С 

COMMAND: Equivalent to the twocommands |015С.1Мап4 IDISC.OUT 
| DISC.IN 

IDISC.IN 

COMMAND: Use disc as file input medium. 

I DISC.OUT 

IDISC. OUT 


COMMAND: Use disc as file output medium. 
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IDRIVE 
I DRIVE, stringexpression: 
IDRIVE,"A" 


COMMAND: Set the default drive. This will fail if AMSDOS is unable to read the 
disc inthe requested drive. 


1ЕВА 
I ERA, string expression: 
ЕВА, "ж, ВАК" 


COMMAND: Erase all files which match the filename and which are not Read/Only. 
Wild cards are permitted. 


I REN 
I REN , string expression, , string expression: 
I REN," NEVNAME. BAS" ,"OLDNAME BAS" 


COMMAND: Give a file a new name. А file with the new name must not already 
exist. Wild cards are not permitted. 


The USER (see USER ahead) parameter may be specified within the ¿string 
expressions to override any default settings. For example, the command 
IREN,"O:NEW.BAS","15:0LD.BAS" will rename the file in USER 15 
called "OLD . BAS", to a file called "NEW.BAS" in USER Ø, regardless of any 
default or previously issued settings of | USER. 


ІТАРЕ 
ІТАРЕ 


COMMAND: Equivalent to the two commands | TAPE. IN and ITAPE.0UT. 
Usedifan external cassette unit is connected. 
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| TAPE.IN 
ІТАРЕ.ІМ 
COMMAND: Use tape ав file input medium. Used if ап external cassette unit is 
connected. 
ITAPE.OUT 
ITAPE. OUT 
COMMAND: Use tape as file output medium. Used if an external cassette unit is 
connected. 
| USER 
I USER , integer expression: 
IUSER,3 


COMMAND: Determines which of up to 16 individual sections of the directory (in the 
range Oto 15), disc functions (e.g. CAT, LOAD, ID IR etc.) are to be performed on. 


A file on one USER number may be transferred to another, by a | REN command. For 
example, REN," 15: EXAMPLE.BAS" ,"U: EXAMPLE. BAS" transfers a file 
from USER number Й to USER number 15, although the name of the file itself 
(EXAMPLE. BAS) isnot changed. 


Copying Files 


AMSDOS files with headers 


It is possible to copy this type of file in the CP/M environment using РТР or 
FILECOPY (See part 2 of this chapter). Any file created by AMSDOS which has a 
header record (see ‘AMSDOS headers’, previously described) will be copyable as a 
whole - disc to disc / disc to tape / tape to disc - but in general the contents of the file 
will not be understood by any CP/M programs. 
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ASCII files 


Files created by AMSDOS without headers are generally in ASCII, and are both 
copyable and understood by CP/M programs. In particular it should be possible to 
exchange ASCII program files, ASCII data files and ASCII text files freely between 
AMSDOS and CP/M programs. 


Read/Only files 


It is possible, using CP/M, to set any file to be Read/Only, and/ or invisible to directory 
cataloguing operations. Such attributes can only be set or reset in the CP/M 
environment, but are honoured by AMSDOS. For further details, see part 2 of this 
chapter on CP/M (STAT utility). 


File Copying procedures 


The tables ahead cover copying files of all sorts between disc and tape (if connected). 
It assumes that no additional disc drive is connected. It is not possible to copy a 
protected BASIC program at all, nor to copy a binary file (such as a machine code 
video game) unless the load addresses are known. Further details of the programs 
FILECOPY, CLOAD and CSAVE are given in part 2 of this chapter, which also 
contains information on the CP/M utility РІР. (Copying files from one disc to 
another in a two drive system is normally easier with the PIP utility.) 


See next page for tables. 
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COPYFROM: 


AMSTRADBASIC ASCIIdata Binary 
CoPYTO: оп{аре* ontape* айыра 
AMSTRAD BASIC ШЕ m 
ә " ^ 
опре change tapes: 
SAVE"FILE" 
1015С 
Binary кенінен 
ontape* TAPE 
ү? MEMORY .s.- 1 
LOAD "FILE" 
“change tapes: 
SAVE"FILE",B, 
8,44, е 
1015С 
MEMORY H 
mote 2. 
ASCH Tm 
оп tape * CLOAD"FILE",TEMP. 
«change tapes- 
CSAVE TEMP ,"FILE" 
ЕВА ТЕМР 
АМ5005 
поќе 1. 
AMSTRADBASIC ітар || 
225% “FILE” 
on disc Ter 
SAVE"FILE" 
ASCII ITAPE 1СРМ 
оп disc LOAD"FILE" CLOAD "FILE" 
1015С AMSDOS 
SAVE"FILE", 
Binary НЕНТМЕМ 
on disc * 1ТАРЕ 
MEMORY 82-1 
LOAD "FILE" 
IDISC 
SAVE"FILE",B, 
М, 
MEMORY H 
“поќе 2. 


* File Һава header 


«note 1, Requires free disc space for temporary file" TEMP". 
«note 2: «s» is start address of file, «|. is length, «r> isoptional run address. 
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------------------- 


COPYFROM: 


AMSTRADBASIC ASClIdata AMSDOS Binary Allother 
COPYTO: ondisc * on disc on disc * ondisc 
AMSTRADBASIC | LoAb"FILE" 
on tape * ITAPE 
SAVE"FILE" 
IDISC 
НЕНТМЕМ 
Втагу MEMORY .в.- 1 
. LOAD "FILE" 
mape [ТАРЕ 
ЗАМЕ "ЕЦЕ", В, 
ERI 
IDISC 
MEMORY H 
note 2- 
ASCH LOAD"FILE" 1СРМ 1СРМ 
ontape * 1ТАРЕ CSAVEFILE CSAVEFILE 
SAVE "FILE",A AMSDOS AMSDOS 
1015С snote 3: 
ICPM 
CSAVEFILE 
АМ5005 
AMSTRADBASIC | LOAD" FILE" 
on disc * change discs. 
SAVE "FILE" 
-er- 
1CPM 
FILECOPY FILE 
follow instructions: 
АМ5005 
ASCH LOAD"FILE" ICPM 
оп діс SAVE"FILE",A FILECOPYFILE 
«follow instructions: 
AMSDOS 
AMSDOS Binary ICPM 
on disc * FILECOPYFILE 
«follow instructions. 
AMSDOS 
Allother ICPM 
on disc FILECOPYFILE 
“follow instructions: 
* Filehasa header #3003 


note 2 «s is start address of file, «b is length, гт, is optional run address. 

«note 3; Destination file cannot be used directly by BASIC. However this option is 
useful as a low cost transportation or backup medium. The file can be copied back 
toadiscby CLOAD "FILE". 
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Reference guide to AMSDOS Error Messages 


When AMSDOS cannot carry out a command for some reason, it will display an error 
message. If there is a problem with the hardware, the error message is followed by the 
question: 

Retry, Ignore or Cancel? 


R causes the operation to be repeated, possibly after the user has taken some 
preventative action. б 


1 causes the computer to continue as if the problem had not occurred, which will often 
lead to unexpected and possibly inconvenient results. 


C causes the operation to be cancelled, which will often lead to a further error 
message. 


For further information see part 6 of the chapter entitled For your reference....’. 

Unknown command 730 

«The command is not spelt correctly. 
Bad command 


... The command cannot be carried out for some reason. Syntax error or inappropriate 
hardware configuration. 


filename already exists 
„User is trying to rename a file with a name already in use. 
‘filename. not found 
«File does not exist. 
Drive «drive: directory full 
„Мо more room in the disc directory а new entry. 
Drive drive: disc full 


Мо more room on the disc for new data. 
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Drive drive: disc changed, closing filename: 
„Disc has been changed with files still open on it. 
filename. is read only 


...File cannot be operated on because it is Read/Only. Files can only be set Read/Only 
or Read/Write in the CP/M environment. 


Drive drive: disc missing 


.... No disc in drive, or disc is not seated and spinning properly. Recommended action 
isto eject and re-insert the disc and type R 


Drive drive: disc is write protected 


....Attempt has been made to write on a disc with the Write Protect hole open. To use 
the disc, eject, close the Write Protect hole, re-insert the disc and type R 


Drive .drive: read fail 


..„Нагаууаге error reading disc. Recommended action is to eject and re-insert the disc 
andtype R 


Drive drive: write fail 


.... Hardware error writing disc. Recommended action is to eject and re-insert the disc 
andtypeR 


Failed to load CP/M 


„Кеа error loading CP/M during | CPM command, or you are not using a valid 
system disc containing CP/M. 
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Part 2: CP/M 


Subjects covered: 


* Booting CP/M 

* Configuration sector 
Ж Direct Console Mode 
Ж Transient programs 
Ж Managing peripherals 


CP/M 2.2 is provided with your CPC664. CP/M is a disc operating system. It is a 
special program which gives you access to the full power of your CPC664 system. 
Because CP/M is available for so many different computers it means that there are 
thousands of applications packages available for you to choose from and a whole 
wealth ofknowledge and experience for you to draw upon. 


Full details of CP/M including information on how to write your own programs and 
information on the AMSTRAD implementation of CP/M are contained in SOFT159 
- A Guide to CP/M. 


Introduction 


The CP/M operating system provides a user interface for disc hardware - a way for 
you to communicate with the computer and manipulate files and peripherals. 


The fundamental interface that is available is called the Direct Console Mode and is 
identified by the А> or B» prompt. Certain built-in commands are available but the 
majority of the functionality is obtained by loading and running "Transient 
Programs’. They are called ‘transient’ because they are only in the computer (rather 
thanon the disc) while you are using them, as opposed to being built-in. 


As well as standard CP/M error messages, the system also generates a number of 
specialised hardware error messages. Refer to the Reference guide to AMSDOS error 
messages’ in part 1 of this chapter. 
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СР/М system tracks 


The major part of CP/M resides on the outermost two tracks of the disc. The computer 
loads CP/M from these tracks into the memory using a two stage process. 


Firstly the AMSDOS command | СРМ loads the first sector of track 0. Оп a system 
disc this sector has been arranged to be a program which then loads the rest of the 
system tracks into memory. Various checks are performed to determine that the 
system tracks contain valid CP/M software and to calculate where in memory to load 
them. 


Configuration Sector 


During the loading process, when CP/M is first activated, various system parameters 
are loaded from a special sector within the system tracks. These parameters include 
the Sign-On (wake-up) message, special keyboard codes required ete. The SETUP. 
utility is provided to customise the configuration sector to your requirements. 


Console control codes 


In the CP/M environment a variety of special key operations are used to control 
program flow. These keystrokes replace the action of the [ESC]ape key used in 
AMSTRAD BASIC, although some applications packages may re-instate the 
[ESC]ape key with some of its former power. 


[CTRL]S Halts the screen output from CP/M. Туре any character to resume. 


[CTRL]C Typed at the start of a line returns control to the Direct Console Mode. 
Many utilities and applications programs will also recognise this as a 
request to abandon the program. 


[CTRL]P Hardcopy toggle. Turn on/off log of all screen output to printer. 
[CTRL]Z Endoftext. 


Logging їп а disc 

Unless special action is taken by the CP/M program (as FILECOPY does for 
example) then CP/M will not allow you to write to a disc unless it has been ‘logged in’. 
Furthermore, the type of disc format (SYSTEM, DATA OR IBM) is only 
re-determined when a disc is logged in. For the main disc drive within the computer 
(Drive A) this takes place whenever CP/M returns to the Direct Console Mode, or 
when [CTRL]C is typed at the A> or B> prompt. For an additional drive (Drive B) this 


takes place the first time that the disc in Drive B is accessed, after Drive A has been 
logged in. 
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Should you try writing to а disc that has not been logged in, the error message: 
Bdos Err on drive: R/O 


ill be displayed. Press any key to continue. However, if the disc was also of a 
different format, then a read or write error will occur. Type C to continue. 


Direct Console Commands 


There are five Direct Console Commands which can be typed at the А> or B» prompt. 
Theseare SAVE, DIR, ERA, REN, and TYPE. 


The first of these; the S AVE command, is for speci: 


ist useonly. 


CP/M Error messages tend to be economical and normally consist of repeating the 
offending command or filename followed by a question mark: 


«unknown command»? 


„whereupon you should repeat the command with the mistake corrected. 


Filenames 


Many of the commands take filenames as a parameters, and where specified, the 
filename may contain wild-cards (see the section entitled "Wild cards' in part 1 ofthis 
chapter). All filenames will be forced to upper case. 


Direct Console Commands and most utility programs do not require that filenames 
are contained in double quotes "". The C LOAD and CSAVE utilities (see ahead) do 
however require that double quotes be placed around the CASSETTE filename. 


Remember that filenames can have an A: or B: prefix to force CP/M to use the 
appropriate drive. 


Switching default drives 


Ifyou have an additional disc drive connected, then it is possible to switch the default 
drive selection between Drive А and Drive В by typing A: or B: at the B> or A» 
prompt. That prompt, of course, tells you the current default drive. Adding the А: 
and B : prefix to filenames overrides, but does not reset, the default drive setting. 
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DIR command 


DIR lists the D I Rectory of the disc. The filenames are not sorted into any particular 
order, but the position of the filename in the DIR display indicates the position of 
that file's entry in the disc directory. Wild cards are permitted. 


DIR will list all files on the default drive 

DIR B: will list all files on Drive B 

DIR *.BAS will list all files oftype . BAS 

DIR 8:%.ВА5 will list all files oftype . BAS on Drive В 
DIR РІР.СОМ willlist only the file РТР . COM (if it exists) - 
ЕВА command 


ERA is used to ER Ase files from the directory. Only the Directory Entry is erased so 
the data is still in the data section of the disc until the space is re-used by another file, 
but the information is nevertheless not recoverable. Wild card filenames are 
permitted. If the filename * . * is specified then ERA will ask for confirmation that 
АП files should be erased. ERA does not list the filenames that are deleted. If any file 
about to be erased is found to be Read/Only (see S TAT ahead), then the command will 
abort. 


ERA PIP.COM will erase the file РТР. COM 

ERA B:PIP.COM  willerasethe file PIP . COM on Drive B 
ERA *.BAS will eraseall . BAS files 

REN command 


REN allows you to REName an existing file. The new filename is specified first, 
followed by = then the existing filename. If the new filename already exists, an error 
message will be displayed. Wild cards are not permitted in the filenames. 


REN NEWNAME.BAS=OLDNAME.BAS will rename the file OLDNAME . BAS 
to МЕММАМЕ - ВАЗ 

REN B:NEWNAME.BAS-OLDNAME.BAS willrenamethefile OLUNAME.BAS 
to NEWNAME . BAS, on Drive B. 


TYPE command 


TYPE asks for the specified file to be T Y P Ed onto the screen. If the file is not an 
ASCII text file, unpredictable and possibly undesirable side-effects may occur. 
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ТҮРЕ ЕХ1.ВА5 


-... Will display the program file ЕХ1.ВА5 


Transient commands 


To perform more sophisticated file management than permitted by the Direct 
Console Mode you must employ one of the various utility programs provided. These 
are invoked merely by typing the program name, possibly followed by some 
parameters. You may possibly have already used FORMAT and FILECOPY. · 


The commands fall into a number of categories as indicated below. Full 
documentation of these programs is extensive and is contained in SOFT 159- A Guide 
toCP/M. 


The SYSGEN, BOOTGEN, FILECOPY, COPYDISC, DISCCOPY, CHKDISC, 
DISCCHK, FORMAT, SETUP, CSAVE, CLOAD and AMSDOS commands are 
designed by AMSTRAD, and work exclusively on the AMSTRAD system. They have 
no function on any other CP/M system, although other manufacturers may supply 
similar utilities (often with the same names) customised for their hardware. 


Peripheral Management 


The PIP utility (Peripheral Interchange Program) allows you to transfer 
information between the computer and its peripherals. In general, the form of the 
command is: 


The ‘source’ and «destination: сап be either a filename, with wild-cards allowed in 
the source, or a device token. The following device tokens may be used: 


As Source As destination 
CON: keyboard CON: screen 
RDR: serial interface PUN: serial interface 
LST: printer 
Examples: 


PIP B:=A:*.COM 


сору all . COM files from Drive A to Drive В 
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PIP 5АУ.ВА5-ЕХ1.ВА5 
...makeacopy of EX 1 . BAS, callingit SAV. BAS 
PIP CON:-EXT.BAS 
„send file EX 1 . BAS to screen. (Similar effect to TYPE EX1.BAS) 
PIP LST:-EX1.BAS 
...send file EX . BAS to printer 
PIP ТҮРЕІМ.ТХТ-СОМ: 
....accept keyboard input intoa filecalled TY PEIN. TXT 


Note that this operation is terminated by the [CTRL]Z control code, and that in order 
to get a new line you must type [CTRL]J after [ENTER] every time. [CTRL]J is the 
ASCII for line feed. 


Note that P IP can NOT be used to copy files from one disc to another on a single drive 
system. Use F ILECOPY instead. 


File and disc copying 


Single file copying 
The utility F ILECOPY allows you to copy files from one disc to another, using the 
single drive within the computer. It copes with dise changing and gives full 
instructions on the screen. If a wild-card filename is specified then F I LECOPY asks 
you to confirm tht you indeed wish to copy each file on an individual basis. The 
program informs you of each filename as each file is copied. 

FILECOPY *.BAS 
„Сору all the files of type . BAS 

FILECOPY EX1.BAS 


...Copy the file ЕХ1.ВА5 
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Whole disc copiers and checkers 


DISCCOPY (for the standard single drive system) and COPYDISC (for two drive 
systems) allow you to make a backup copy of the entire disc. They give full 
instructions on the screen. 


If the destination disc is not formatted, or not of the same format as the source disc 
then these utilities will automatically format the disc correctly as they copy. 


The companion utilities DISCCHK and CHKDISC allow you to compare two discs 
and verify that they are have exactly the same contents. 


Cassette files 


Two utilities are available which transfer files between disc and cassette. Except for 
specialist use it is unlikely that anything than ASCII, i.e. plain text, files can usefully 
betransferred. 


CLOAD can take two parameters, the first is the source (cassette) filename, enclosed 
in double quotes, and the second the destination (disc) filename. If the destination 
filename is omitted, the disc file will have the same name as the cassette file, which 
must then be a CP/M compatible filename. If the source filename is omitted then 
CLOAD reads the first file encountered on the tape. If the first character of the 
cassette filename is ! then the normal cassette messages will be suppressed. 


Example command: 
CLOAD "MY LETTER" MYLETTER.TXT 


CSAVE can take three parameters. The first is the source (disc) filename and the 
second the destination (cassette) filename, enclosed in double quotes. If the 
destination filename is omitted, the cassette file will have the same name as the disc 
file. If the first character of the cassette filename is ! then the normal cassette 
messages will be suppressed. If both filenames are specified, then a third parameter 
may be used to specify the tape write speed; @ for nominal 1000 baud, 1 for nominal 
2000 baud. 


Example commands: 


CSAVE OUTPUT.TXT "OUTPUT TEXT" 1 
CSAVE DATAFILE 
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System Management 


STAT 


STAT provides more sophisticated directory (and peripheral) management. АН the 
normal rules apply to the filenames, including the use of wild-cards. Facilities 
provided are as follows: 


STAT 
STAT A: 
STAT B: 


isplays disc status and free space. 


STAT *.COM 
STAT EX1.BAS 


...displays extended directory information about a particular file. 


STAT *.COM $R/O 
STAT EX1.BAS $R/O 


„Sets a file to a Read/Only status, so that it cannot be accidentally erased or 
overwritten, 


STAT *.COM $R/W 
STAT ЕХ1.ВА5 $R/W 


»..Setsa file to Read/Write status, reversing the Read/Only assignment. 


STAT *.COM SSYS 
STAT SECRET.BAS $SYS 


„sets a file to ‘System’ status so that it is invisible to directory listings and file 
copying programs. The file will still be available for all other purposes. 


STAT *.COM SDIR 
STAT SECRET.BAS $DIR 


-Sets a file to Directory’ status, reversing the ‘System’ assignment. 
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SETUP 


This utility allows you to re-define the characteristics of the CPC664 keyboard and 
disc drive section, and serial interface. It also enables you to invoke various actions 
when CP/M is first loaded. When finished it updates the configuration sector. The 
program is menu-driven and when a particular screen is correct, or requires no 
modification, move on to the next by answering Y to the question: 


Is this correct (Y/N):_ 


The program can be aborted by [CTRL]C keys. When all the changes have been made 
it will prompt: 


Do you want to update your system disc (¥/N):_ 


+ giving you the opportunity to retain the existing configuration sector by typing М. 
It will also prompt: 


Do you want to restart CP/M (Y/N):_ 
allowing you to load and try the new configuration by typing Y 


То copy a configuration sector from one disc to another, either use BOOTGEN (see 
ahead) or load S ETUP from the source disc, answer Y to EVERY question, inserting 
the destination disc before answering the penultimate question. 


Characters with an ASCII value less than decimal 32 can be typed into strings by 
typing a | followed by a suitable character from the set 2,A-Z,[,\,J,>, — 


The following options are those more commonly requiring attention: 


** Initial command buffer: 


Any characters entered here will appear as if they had been typed into the Direct 
Console Mode when CP/M is first loaded. This has the effect of auto-running a 
particular program at that time. Remember to include the equivalent of the [ENTER] 
key which is represented by the two characters | М 


For example to auto-run $ TAT, the initial command buffer shouldbe STAT 1 M 


Sign-on string: 


This is the message displayed at the top of the screen when CP/M is first loaded. Note 
the use of 1 J 1 M to give a carriage return - line feed effect. The early part of the 
standard message sets suitable screen and border colours for working in 80 column 
mode, and should be copied exactly if they are to be preserved. 
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Keyboard translations: 


This allows new ASCII values to be set into keys, effectively simulating the KE Y DE F 
command in BASIC. The parameters required are the key codes, and the ASCII 
valuesto set into them. For an illustration of key numbers, refer to the diagram at the 
top right hand side ofthe computer, or to the chapter entitled ‘For your reference....’. 


Keyboard expansions: 
Effectively simulates the KE Y command in BASIC. 


AMSDOS 


This program relinquishes control from CP/M and returns to the built-in AMSTRAD 
BASIC, from which the AMSDOS disc commands will be available. 


Disc Generation 
FORMAT 


The computer supports three disc formats, one of which has two variants. 


The usual format is system format, obtained by using the standard FORMAT 
command. The system tracks are read from the disc containing the FORMAT . COM 
program and are automatically written to the destination disc. 


The other formats are obtained by adding a single letter as а parameter to the 
command, separated by a single space: 


For Data Format type: FORMAT D 

For IBM Format type: FORMAT I 

For Vendor Formattype: FORMAT V 
WARNING 


The licence agreement for your CP/M (which is electronically serial-number encoded) 
permits its use on a single computer system only. In particular this means that you 
are prohibited from giving any other person a disc with YOUR serial-numbered сору 
of CP/M on it. Because every system disc you make has your CP/M on it, you must be 
careful, therefore, not to sell, exchange or in any other way part with, any system 
format disc. Instead you must format a disc in Vendor format, which is identical to 
system format except that the system tracks are blank, and then copy the relevant 
software onto that disc using F I LECOPY or PIP. Be careful that the software you 
copy in this way is not itself copyright or subject to a licence agreement. 
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If you receive software on а disc in Vendor format, in order to use it conveniently, you 
may either copy it to a system disc by using F I LECOPY or PIP, or alternatively 
convert the disc to a system disc by adding your CP/M to it. This is acheived with the 
BOOTGEN and SYSGEN commands. Carefully read the End User Licence 
Agreement section of this manual. 


MOVCPM 


Sometimes it is required to construct a version of CP/M which does not load into 
memory at the standard position. This may be because you wish to reserve some 
memory for other purposes. Therefore CP/M itself must be moved to a lower portion of 
memory, and it is possible to locate CP/M at any position in memory on a 256-byte 
boundary. The position is specified by a size parameter in the range 64 to 179. This 
parameter indicates the number of 256-byte areas available for CP/M and transient 
programs, 


The resulting relocated CP/M can either be written to the system disc using SY SGEN 
or saved using a command prompted by the MOV СРМ program. 


The syntax ofthecommandisMOVCPM «size Ж 
MOVCPM 178 * 


... Will make a CP/M 256 bytes lower in memory than the standard version (which is 
created with the maximum possible size of 179). 


SYSGEN 


SY SGEN writes the result of a MO V C PM command onto the system tracks ofa system 
or Vendor disc. There are three options: 


SYSGEN * 


will write the CP/M generated by an immediately preceding MO V СРМ command. 


SYSGEN filename- 


сә Will read in the specified file, which will probably have been saved after a MOV C PM 
command, and write that to the system tracks, e.g. SYSGEN CPM44. СОМ 


SYSGEN 
...(with no parameters) will prompt for a source and destination disc, and therefore 


copies the system tracks from one disc to another. This is the option to use if 
upgrading a Vendor disc to a system disc. 
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ВООТСЕМ 


BOOTGEN, which will prompt for source and destination discs, copies Sector 1, track 
0(theloader)and the configuration sector from one disc onto another. Use BOOTGEN 
as part of the process of upgrading a Vendor disc to a system disc, or when you want to 
distribute a newly designed configuration sector around a number of discs. 


Advanced programming 


The following programs are available on the disc for specialist use, and it is 
recommended that the user consult SOFT 159 - A Guide to CP/M, or other reference 
works. 


ASM 8080 Assembler. 

DOT 8080 Assembly code debugging aid. 
DUMP Hexadecimal file dump utility. 

ED Asimple context editor. 

SUBMIT Console Command Mode batch processing. 
XSUB Transient program batch processing. 
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Chapter 6 
Introduction to LOGO 


This Section is intended to introduce the subject of LOGO, with examples, and 
provide a guide to the commands available. It is not intended to be an exhaustive 
tutorial or reference guide. Such a book is provided by “А guide to LOGO’ (SOFT160) 


Subjects covered are: 


Ж Concept of LOGO 

* Loading and Running Dr. LOGO 
Ж Turtle Graphics 

* Writing your own procedures 

Ж Editing your own procedures 


What is LOGO? 


LOGO can help you grow as a programmer, whether or not you have ever 
programmed before. 


LOGO is a powerful programming language that is rapidly gaining popularity 
because it is so easy to learn and use. 

You use procedures as building blocks to create LOGO programs. Dr. LOGO itself is a 
collection of procedures, called primitives, that you use to build your own programs. 
During the 1970's, a team of computer scientists and educators under the direction of 


Seymour Papert, developed LOGO with turtle graphics to allow very young children 
to program and use a computer. 


They developed the turtle so that young learners could have, as Papert says, ‘an 
object to think with’, a tool to help them learn in new ways. 


In the form of an arrow head, the turtle can be directed across the screen by the use of 
simple commands. 


Dr. LOGO 


Dr. LOGO is a thoughtful implementation of LOGO which has been specially 
customised for the AMSTRAD personal computer to make it even easier to program. 
Extensions have been included to make available the powerful sound facilities of the 
CPC664 and program editing is made easy by the inclusion of the cursor key cluster. 
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Getting Started 


To operate Dr. LOGO, insert a copy of Side 2 of your master disc into the computer's 
disc drive. (Part 10 of the Foundation Course contains imstructions on how to copy the 
master disc.) 


Press the [CTRL][SHIFT] and [ESC] keys simultaneously to reset the computer. 
Typein | C PM [ENTER] and LOGO will load automatically. 
The following Dr. LOGO wake-up message will be displayed on your monitor: 


Welcome to 


Amstrad LOGO V1.1 
Copyright (c) 1983, Digital Research 
Pacific Grove, California 


Dr. Logo is a trademark of 
Digital Research 


Product Мо. 6002-1232 


Please Wait’ 


This greeting will soon disappear and a question mark prompt ? will appear on your 
Screen. 


The question mark tells you that Dr. LOGO is waiting for you to type something at 
your keyboard. 


FirstSteps 
Trytyping in (using lower case letters): 


fd 60 [ENTER] 


„гапа you will see a turtle appear which then moves forward 60 units leaving a line 
behind it from where it started, to where it finished. The screen will clear giving a 


large graphics area and a smaller text area with the ? prompt near the bottom of the 
screen. 


Dr. LOGO will often decide to re-arrange the screen so as to give either a large text 
area or large graphics area, for your convenience. 
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Туреіп: 
rt `9@ [ENTER] 


„and the turtle will move 90 degrees to the right. (From now on we will assume that 
you press the [ENTER] key after every line of command.) 


Nowtype in: 
fd 60 


...and another line will be drawn the same length and at right angles tothe first line. 


Experiment with the simple instructions f d, bk (short for back), r t and Lt (short 
for left) to see what happens оп the screen. 


Dr. LOGO Procedures 


A procedure is а list of instructions that tells Dr. LOGO how todoa task. 


You will probably write your first procedures by adding to those already built into Dr. 
, these are called ‘primitives’. 


fd, bk, rt and Lt are all built-in primitives which you may use at any time as 
building blocks to write your own procedures. 


Another very useful built-in primitive is cs which clears the screen and sends the 
turtle to its starting position. 


Writing a Simple Procedure 
Itis easy to visualise that ifthe movements: 
fd 60 rt 90 


зе меге to be repeated 4 times each, a square with sides of 60 units would be drawn. 
The same effect can be achieved by writing а simple formula: 


repeat 4 [fd 60 rt 902 

Clear the screen and then try typing this in to check what happens. 

Tomake this formula into a new procedure called's qua r e' type: 
to square 


repeat 4 [fd 68 rt 901 
end 
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Dr. LOGO will now understand ‘square’ and each time it encounters the word 
‘square’ it will draw a square on the screen. We could have given this procedure 
any name, but we chose ‘s quar e’ to remind us what it does. 


Dr. LOGO allows us to type in a whole set of commands together so the instructions 
square rt 45 square, will draw two squares, the second at a 45 degrees 
angle to the first. 


Procedures with parameters 


It is possible to make a procedure to which we can say ‘how much’, in the same way 
that we can say ‘how much’ to built-in procedure. To make a procedure that will draw 
squares of different sized sides, the definition of‘s quar е” can be altered to: 


to squareanysize :side 
repeat 4 [fd :side rt 901 
end 


This new procedure introduces the idea of a 'variable', which in this case is called 
15іде 


You will notice that the variable : s i de is proceeded by a colon, this indicates to Dr. 
LOGO that : s i de isa variable rather than a command. 


When we use procedure squareanysize :side musthave a value. Hence an 
instruction squareanysize 150 would produce a square with sides of 150 


ЖУ айга two procedures together and see what happens. For example from an 
instruction: 


cs squareanysize 100 rt 45 squareanysize 150 


„the turtle will draw two squares of differing sized sides, and one will be at a 45 
degrees angle to the other. 


Notice how Dr. LOGO uses an exclamation mark ! to remind you that a line of 
commands has split across more than one line of screen. 


Using Variables to remember values 


Dr. LOGO will also allow us to use variables to remember values, as well as for 
passing values toa procedure. 
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First define a new procedure called triangle: 


to triangle 
repeat 3 [fd :edge rt 1201 
end 


Wecan test this by typing: 


make “edge 108 
triangle 


If we want to know the value remembered by : edge we can just type : edge after 
the ? prompt and Dr. LOGO will print the value. 

Finally we can use our variable : edge in a new procedure to draw a pattern. Notice 
how the value of : edge is increased by adding to its previous value so that each time 
we draw the pattern it gets bigger. 


to pattern 

triangle lt 60 triangle rt 60 
make "edge :edge*4 

pattern 

end 

make "edge 10 

cs pattern 


When you have seen enough, press [ESC] to stop the program. 


Editing programs and procedures 


Dr. LOGO allows us to correct typing mistakes and to alter procedures we have 
defined. The editing keys to use are: 


The cursor Кеуз< <> (which move the cursor by one character or line at a time. 


The cursor кеуѕ < >00 pressed at the same time as holding down [CTRL] will move 
thecursor up and down a page, and tothe left and right ofa line. 


[CLR] deletes the character under the cursor, [DEL] deletes the character to the left of 
the cursor. 


[ENTER] tells Dr. LOGO that you have finished editing a line of commands or makes 
anew line if you are editing a procedure. 


[ESC] means abandon and [COPY] tells Dr. LOGO that you have finished editing a 
procedure. 
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When typing in commands or new procedures, simply edit the text in front of you on 
the screen. Any characters other than those mentioned above will be inserted into the 
text at the cursor position. 


Toedit an existing procedure use the command ed 


Dr. LOGO will display the old version of the procedure on the screen for you and you 
can use all the commands above to move the cursor around and change what it says. 


Try editing the procedure patternsbytypinged "patterns 


Experiment with the editing keys. If when you have finished if you press [ESC], then 
Dr. LOGO will abandon what is on the screen and give you back the original unedited 
version. 


Typeed “patterns again, and after changing the number 4 to 8, press [COPY] 
to exit, then re-run the procedure and see how the screen output has changed, 
Remember to set the initia! value into : edge 


Operating hints 


The workspace used by Dr. LOGO is divided into nodes. You can see how many are 
left by typing: 


nodes 


Occasionally, when nearly all the nodes are used up, Dr. LOGO will tidy up the 
workspace and you may see the turtle pause while this happens. You can ask Dr. 
LOGO totidy the workspace by typing the command: 


recycle 
This will often allow you to continue after Dr. LOGO has complained of not having 
any more nodes left. 


Make sure that there is plenty of disc space left before starting Dr. LOGO in case you 
decide to save your procedures on disc. You can use the CAT command in AMSDOS 
(see part 7 of the Foundation course). 


Glance through the final section ahead and try some of the examples - you won't 
understand everything first time! As you learn about Dr. LOGO you will be able to 
use more and more of the commands. 


When you have finished with Dr. LOGO type: 


bye 
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Summary of Dr. LOGO primitives 


This section groups together alphabetical lists of Dr. LOGO primitives showing the 


inputs to use, often with an example. 


WORD END LIST PROCESSING: 


(Note that prompts ? and > are shown in the following examples) 


ascii 
Outputs the ASCII value of the first character in the input word. 
?ascii "G 
71 
?ascii "g 
103 


ы 
(but first) Outputs all but the first element in the input object. 


?bf “smiles 
miles 
?bf [1 2 3) 
[2 31 


bl 
(but last) Outputs all but the last element in the input object. 


?bl "smiles 
smile 

и [1 2 3 4] 
t12 31 


char 


Outputs the character whose ASCII value is the input number. 


?char 83 
5 
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count 


Outputs the number of elements in the input object. 
?count "six 


?count [Ø 1 2 33 
4 


emptyp 


Outputs TRUE if the input object is an empty word or an empty list, otherwise 
outputs FALSE. 


?emptyp " 
TRUE 
?emptyp (2 
TRUE 
?emptyp Cx] 
FALSE 
?make "x [7 
?emptyp :x 
TRUE 


first 


Outputs the first element ofthe input object. 
?first "zebra 
2 
?first [1 2 31 
1 
fput 


(firstput) Outputs a new object formed by making the first input object the first 
element in the second object. 


?fput "s "miles 
smites 

?fput 1 [2 31 
r1 2 33 
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Нет 
Outputs the specified element ofthe input object. 


?item 4 "dwarf 
r 


list 


Outputs a list made up ofthe input objects, retains list's outer brackets (compare with 
se). 


701151 12 3 4) 
[123 41 

?list "big [feet] 
[big Lfeet11 
2Clist) 

t1 


(sentence) Outputs a list made up of the input objects, removes list's outer brackets 
(compare with List). 


?make "instr list rL 
repeat 4 [fd 50 rt 901 
?run (se "cs :instr List "ht) 


Note that the underline character between instr and List is obtained by 
pressing [SHIFT]2 


word 
Outputs а word made up ofthe input words. 


?word "sun "shine 
sunshine 


wordp 
Outputs TRUE ifthe input object is a word ог а number. 


?wordp “hello 
TRUE 

?wordp LJ 
FALSE 
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Arithmetic Operations: 


cos 


Outputs the cosine ofthe input number of degrees. 


?cos 60 
0.500000000017049 


int 


Outputs the integer portion of the input number. 


?int 4/3 
1 


random 
Outputs а random non-negative integer less than the input number. 
?random 20 


sin 
Outputs the sine of the input number of degrees. 


?sin 30 
0.500000000017049 


* 


Outputs the sum ofthe input numbers. 


Же 2. 2. 
4 

22%2 
4 
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Outputs the difference ofthe two input numbers. 


2- 105 
5 

?10-5 

5 


* 


Outputs the product of input numbers. 


?* 4 6 
24 
?4*6 
24 
/ 
Outputsthe quotient ofthe two input numbers. 
?/ 25 5 
5 
?25/5 
5 
Logical Operations: 
and 


Outputs TRUE ifthe result of all input expressions are true. 


?and (3«4) (7>4) 
TRUE 


not 


Outputs TRUE ifthe input expression is false. 
Outputs FALSE ifthe input expression is true. 


?not (3-4) 
TRUE 

?not (3-3) 
FALSE 
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— 
or 


Outputs FALSE ifall input expressions are false. 


?or "TRUE “FALSE 
TRUE 

?or (3-4) (1-2) 
FALSE 


Outputs TRUE ifthetwo input objects are equal; otherwise outputs false. 


2= "LOGO "LOGO 
TRUE 
2122 
FALSE 


> 


Outputs TRUE if the first input word is greater than the second; otherwise outputs 
false. 


2> 19 20 
FALSE 
220>19 
TRUE 


< 


Outputs TRUE ifthe first word is less than the second; otherwise outputs false. 


2< 27 13 
FALSE 
213«27 
TRUE 
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Variables: 


local 


Makes the input-named variable(s) accessible only to the current procedure and the 
procedures it calls. 


>Clocal "x "y "2) 


make 


Makes the input-named variable the value of the input object. 


?паке "side 50 
?:side 
50 


Procedures: 
end 


Indicates the end of a procedure definition; must stand alone at the beginning of the 
lastline. 


?to square 

»repeat 4 [fd 58 rt 901 
»end 

square defined 

?square 


po 
(print out) Displays the definition(s) of the specified procedure(s) or variable(s). 


?po "square 

to square 

repeat 4 [fd 50 rt 901 
end 

?po "x 

x is 3 
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pots 
(print out titles) Displays the names and titles of all procedures in the workspace. 


?pots 


to 

Indicates the beginning ofa procedure definition. 
?to square 
»repeat 4 Cfd 58 rt 901 


>end 
square defined 


Editing: 


ed 


(edit) Loads the specified procedure(s) and/or variable(s) into the screen editor’s 
buffer. 


?еа "square 


TextScreen: 
ct 


(clear text) Erases all text in the window that currently contains the cursor, then 
positions the cursor in the upper-left corner ofthe window. 


?ct 


pr 


(print) Displays the input object(s) on the text screen, removes list's outer brackets, 
follows last input with a carriage return (compare with s how and t ype). 


?рг Га b с] 
abc 
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setsplit 
Sets the number of lines in the split screen. 


?setsplit 10 


show 


Displays the input object on the text screen, retains list’s outer brackets, follows 
input witha carriage return (compare with pr and type). 


?show Га b c] 
Га b c) 


ts 


(text screen) Selects a full text screen. 


?ts 


type 


Displays the input object(s) on the text screen, removes list's outer brackets, does not 
follow last input with a carriage return (compare with pr and s how). 


?type Га b cJ 
abc 


Graphic Screen: 


Note that the screen is in Mode 1, giving four colours, and that the same co-ordinate 
system is used as in AMSTRAD BASIC. In other words al! screen positions will be 
rounded to the nearest even-numbered screen dot. Red green and blue colours can 
have amounts of 0, 1, or 2. 


clean 


Erases the graphic screen without affecting the turtle. 


2ға 50 
?clean 
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(clear screen) Erases the graphic screen and puts the turtle at [0,0] heading 0 (north) 
with the pen down. 


?rt 90 fd 50 
?cs 


dot 


Plots a dot at the position specified by the input co-ordinate list in the current pen 
colour. s 


?dot [58 101 


fence 


Establishes a boundary that limits the turtle to the visible graphics screen. window 
removes the boundary. 


?fence 
?fd 300 
Turtle out of bounds 


fs 
(full screen) Selects a full graphic screen. 


?fs 


pal 


(palette) Outputs numbers representing the amount of red, green, and blue colour 
assigned to a pen. 


?pal 2 

to 2 21 
setpal 
(set palette) Sets the pen colour palette. Assign an amount of red, green, and blue toa 
pen. 


?setpal 3 [1 1 23 
?pal 3 
Ct 1 21 
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sf 


(screen facts) Outputs information about the graphic screen. The format is: 
[-bgcolour, .sereen-state, ‹вр1{-вїте› «window-state> ‹зегапер»] where -bgeolour is 
the background pen number, always 0. «screen-state» indicates S S (split screen), FS 
(full screen) or T S (text screen). .split-size: is the number of text lines displayed on 
the split screen's text window, and .window-state- indicates WINDOW, WRAP, or 
FENCE mode. scrunch» is permanently set to 1. 


?sf 
0 $$ 5 FENCE 11 


(split screen) Displays a window of text on the graphic screen. 


?ss 


window 


Allows the turtle to plot outside the visible graphic screen after a wrap or fence 
expression. 


?fence fd 300 
Turtle out of bounds 
?window 

?fd 300 


wrap 


Makes the turtle reappear on the opposite side of the graphic screen when it exceeds 
theboundary. 


?cs wrap 
art 5 fd 1008 
?cs window 

art 5 fd 1000 
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Turtle Graphics: 


bk 


(back) Moves the turtle the input number of steps in the opposite direction of its 
heading. 


?cs fd 150 
?bk 50 


fd 


(forward) Moves the turtle the input number of steps in the direction of its current 
heading. 


?fd 80 


ht 
(hide turtle) Makes the turtle invisible; speeds and clarifies drawing. 


tht 
?cs fd 50 
?st 


It 
(left) Rotates the turtle the input number of degrees to the left. 


?lt 90 


ра 


(реп down) Puts the turtle’s pen down; the turtle resumes drawing. 


?fd 20 pu fd 20 
?pd 
?fd 20 
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ре 


(реп erase) Changes the turtle's pen colour to 0, the background colour; the turtle 
erasesdrawn lines. 


?fd 58 
?ре 

?bk 25 
244 50 
?pd fd 25 


pu 
(pen up) Picks the turtle's pen up; the turtle stops drawing. 


?fd 38 
?pu 

?fd 30 
?pd fd 30 


px 


(pen exchange) Makes the turtle exchange the colour of any previously coloured pixel 
in its trail with the reverse or logical colour compliment. 


?fd 20 pu fd 20 
?pd setpc 3 fd 20 


?px 
?bk 80 
?fd 80 
?pd bk 108 
rt 
Rotates the turtle the input number of degrees to the right. 
?rt 90 
seth 


(set heading) Turns the turtle to the absolute heading specified by the input number 
of degrees; positive numbers turn the turtle clockwise; negative numbers turn the 
turtle counter-clockwise. 


?seth 90 
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setpc 


(set pen colour) Sets the turtle's pen to that specified by the input number. (0 is the 
background colour.) 


?setpc 1 


setpos 
(set position) Moves the turtle to the position specified in the input co-ordinate list. 
?setpos [30201 


st 


(show turtle) Makes the turtle visible if hidden. 


?ht 
?fd 50 
?st 


tf 


(turtle facts) Outputs information about the turtle. The format is: [‹хсог› ‹усог» 
«heading, -penstate» .pencolour n» .shownp: | where .xcor; is the turtle’s x co-ordinate, 
»ycor is the turtle's y co-ordinate. «heading: indicates the compass direction the 
turtle is facing. .shownp; is TRUE if ће turtle is visible. .penstate: indicates P D (pen 
down), РЕ (pen erase), РХ (pen exchange) or PU (pen up). -pencolour n» identifies the 
pen'snumber. 


?setpos [15 301 

?rt 60 

?setpc 3 

?pe 

?ht 

?tf 

[15 30 60 РЕ 3 FALSE] 
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Workspace Management: 


er 


(erase) Erases the specified procedure(s) from the workspace 


?er "square 


em 
(erase name) Erases the specified variable(s) from the workspace. 
?таке “side [1001 
?make "angle [451 
?:side :angle 
[19021 
[451 
?ern [side anglel 
?:side 
side has no value 
nodes 
Outputs the number of free nodes in the workspace. 


?nodes 


recycle 
Frees as many nodes as possible and reorganises the workspace. 


?recycte 
?nodes 


Property Lists: 
glist 


(get list) Outputs a list of all the objects in the workspace that have the input 
property name in their property lists. 


?glist ".DEF 
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gprop 


(get property) Outputs the property value of the input property name of the 
input-named object. 


?make "height "72 


?gprop "height ".APV 
72 


plist 

(property list) Outputs the property list of the input-named object. 
?plist "height 
Г.АРУ 721 


рргор 


(put property) Puts the input property pair into the input-named object's property 
list. 


?pprop "master ".APV "Scott 
?:master 
Scott 

remprop 


(remove property) Removes the specified property from the input-named object's 
property list. 


?remprop "master ".APV 
Disc Files: 


dir 


(directory) Outputs a list of Dr. LOGO file names on the default or specified disc; 
accepts wild-cards. 


?dir "a:?2222222 


(Study part 1 of the chapter entitled 'AMSDOS and CP/M’ for the use of 2222222? 
wild-card characters. Note that the * wild-card is not supported in Dr. LOGO.) 
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load 


Reads the input-named file from the disc into the workspace. 


?load "myfile 
?load "b:shapes 


save 


Writes the contents of the workspace to the input-named disc file. 


?save “shapes 


Keyboard and Joystick: 
buttonp 


(button pressed) Outputs TRUE if the button on the specified joystick is down; 
numbers 0 or 1 identify the two possible joysticks. 


?to fire 

>label "Loop 

>if (buttonp Ø) Cpr [fire 0!J] 
>if Cbuttonp 1) Cpr [fire 1!11 
>go "loop 

>end 


The position of the joystick is tested by padd Le. 


keyp 


Outputs TRUE if a character has been typed at the keyboard and is waiting to be 
read. 


?to inkey 
»if keyp Гор rc] Гор "1 
>епа 
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paddle 


Returns the state of either joystick 0 or 1. The positions ofthe joystick are indicated as 
follows: 


Valuereturned Meaning 


255 Nothing pressed 
0 Up 

Upandright 
Right 

Down and right 
Down 

Down and left 


Asma t е 


Left 
Upandleft 


?paddie 0 
255 


The fire buttons aretested by but tonp. 


үс 

(read character) Outputs the first character typed at the keyboard. 
?make "key rc 

„then press X key... 


?:key 
x 


xl 


(read list) Outputs a list that contains a line typed at the keyboard; input must be 
followed by a carriage return. 


?make "instr List rl 
repeat 4 [fd 50 rt 901 
?:instr.list 

[repeat 4 [fd 58 rt 9011 
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rq 


(read quote) Outputs a word that contains a line typed at the keyboard; input must be 
followed by a carriage return. 


?make "command rq 
repeat 3 Lfd 60 rt 1201 


?:command 
repeat 3 [fd 60 rt 1201 


SOUND: 


The sound commands are unique to the AMSTRAD implementation of Dr. LOGO and 
aresimilar to their AMSTRAD BASIC counterparts. 


Refer to part 9 of the Foundation course for further information. 


sound 


Put a sound into the sound queue. The format is: [channel status, «опе period: 
duration: volume» -volume envelope: tone envelope: :noise:] The parameters after 
duration are optional. 


?sound [1 28 501 


env 


Set up a volume envelope. The format is: [-envelope number: «envelope section(s):] 


?епу C1 100 2 201 
?sound СТ 200 388 5 11 


ent 


Set up a tone envelope. The format is: [«envelope number, «envelope section(s): | 
?ent [1 100 2 201 
?sound [1 200 300 5 1 11 

release 


Releases sound channels that have been set to a hold state in a sound command. The 
channels to release are indicated as follows: 
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Inputvalue Channelsreleased. 


0 None 

1 A 

2 в 

3 AandB 

4 с 

5 AandC 

6 BandC 

7 AandBandC 
?release 1 

Flow of Control: 

bye 


Exits the current session of Dr. LOGO. 
?bye 
co 


Endsa pause caused by [CTRL]Z, pause or ERRACT 


?co 


go 


Executes the line within the current procedure following a label expression with the 
same input word. 


>go "Loop 
if 


Executes one of two instruction lists depending on the value of the input expression; 
input instructions must be literal lists enclosed in brackets. 


»if (a»b) [pr Са is bigger]] 
>Грг [b is bigger22 
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label 


Identifies the line to be executed after a go expression with the input word. 


»Label "Loop 


op 


(output) Makes the input object the output of the procedure and exits the procedure 
atthat point. 


?op [result] 


repeat 
Executes the input instruction list the input number of times. 


?гереас 4 Lfd 50 rt 901 


run 
Executes the input instruction list. 


?make “instr_list [fd 40 rt 901 
?run :instr List 


stop 


Stops the execution of the current procedure and returns to TOPLEVEL (the ? 
prompt) ог the calling procedure. 


?stop 
wait 


Stops procedure execution for the amount of time specified by the input number. 


The amount oftime 7 input number * 0.22 seconds. 


?wait 20 
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Exception Handling: 


catch 


Traps errors and special conditions that occur during the execution of the input 
instruction list. 


>catch "error C+ CJ CI) 


>рг СІ am here] 
1 ап here 


error 
Outputsa list whose elements describe the most recent error. 


>catch "error Cdo.until.error] 
>show error 


pause 


Suspends the execution of the current procedure to allow interaction with the 
interpreter or editor. 


>if :size»5 [pause] 


throw 
Executes the line identified by the input name ina previous са t ch expression. 


?throw "TOPLEVEL 


System Primitives: 


contents 


Displays the contents of Dr. LOGO symbol space. 
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.deposit 


Puts second input number into the absolute memory location specified by the first 
input number. 


.examine 


Displays the contents of the absolute memory location specified. 


System Variables: 
ERRACT 


When TRUE, causes a pause when an error occurs, then returns (о TOPLEVEL. 
FALSE 

System value. 

REDEFP 

When TRUE allows redefinition of primitives. 

TOPLEVEL 


throw" TOPLEVEL willexit all pending procedures. 


TRUE 


System value. 


System Properties: 
„ВРУ 


Associated property value; the value оҒа global variable. 
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.DEF 


Definition ofa procedure. 


РЕМ 


Identifiesa primitive. 
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Chapter Z 
Foryourreference.... 


This chapter provides much of the reference information that you 
are likely to require as you learn to use this computer. 


Subjects covered: 


Cursor locations and control code extensions 
Interrupts 

ASCII and graphics characters 
Key references 

Sound 

Error messages 

BASIC keywords 

Planners 

Connections 

Printers 

Joysticks 

Discorganisation 

Memory 


+++ 


For a complete guide to the BASIC and firmware for the CPC664, consult AMSOFT 
manuals, SOFT 945 and SOFT 946 respectively. 


Part 1: 
Cursor locations and control code extensions 


In a variety of applications programs, the text cursor may be positioned outside the 
current window. Various operations force the cursor to a legal position before they 
are performed, these being as follows: 


For your reference... Chapter 7 Page 1 


1. Writingacharacter 
2. Drawing the cursor ‘blob’ 


3.  Obeying the control codes marked with an asterisk in the list ahead. 


‘The procedure for forcing the cursor to a legal position is as follows: 


1. Ifthe cursor is to the right of the right hand edge, then it is moved to the leftmost 
column of the next line down. Җ 


2. Ifthe cursor is to the left of the left hand edge, then it is moved to the rightmost 
column of the next line up. 


3. Ifthe cursor is above the top edge, then the window is rolled down a line and the 
cursor is set to the top line of the window. 


4. Ifthe cursor is below the bottom edge, then the window is rolled up a line and the 
cursor is set to the bottom line of the window. 


Тһе tests and operations are done in the order given. The illegal cursor positions may 
be zero or negative, which are off to the left or above the window. 


Character values in the range 0 to 31 sent to the text screen do not produce a 
character on the screen but are interpreted as CONTROL CODES (and should not be 
injudiciously applied). Some of the codes alter the meaning of one or more of the 
following characters, which are the code's parameters. 


A control code sent to the graphics screen will merely print the conventional symbol 
related to its function if accessed via the keyboard (e.g. &07 ‘BEL’ - (CTRL] G). It will 
execute its control function if addressed using the form of the command: 


PRINT CHR$(&Ü7), or PRINT "43" (where the 4% is obtained by pressing 
[CTRL]G within the PRINT statement). 


The codes marked * force the cursor to a legal position in the current window before 
they are obeyed - but may leave the cursor in an illegal position. The codes and their 
meanings are described with first their HEX value (&XX), then the decimal 
equivalent. 
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Control characters 


Value Name Parameter Meaning 
&00 0 NUL Noeffect. Ignored. 
«011 SOH Oto 255 Print the symbol given by the 


parameter value. This allows the 
symbols in the range 0 031 to 
be displayed. š 


&022  STX Turn off text cursor. Equivalent 
to CURSOR command with a «user 
switch: parameter value of 0. 


&033  ETX Turnon text cursor. Equivalent. 
to CURSOR command with a «user 
switch: parameter value of 1. 
Note that to display a cursor 
from within a BASIC program 
(otherthan the automatic cursor 
generated when BASIC is awaiting 
keyboard input), a CURSOR 
command with a ‘system switch» 
parameter value of 1 must be 


used. 

&044 EOT 0to2 Set screen mode. Parameter taken 
MOD 4. Equivalent toa MODE 
command. 

&05 5 ENQ 040255 Sendthe parameter character to 
the graphics cursor. 

&06 6 АСК Enable Text Screen. (See &15 NAK 
ahead.) 

&077 BEL CRG Sound Bleeper. Note that this 
flushes the sound queues. 

&08 8 * BS Move cursor back one character. 
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Value Name 


&09 9 * ТАВ 


&0F 15 SI 


&10 16 * DLE 


61117 * DCI 


&12 18 * DC2 


&13 19 * DC3 


Parameter 


0{о15 


0to15 


Meaning 
Move cursor forward one character. 
Movecursor down one line. 
Movecursor upone line. 


Cleartext window and move 
cursor to top left corner. 
Equivalent toa CLS command, 


Move cursor to left edge of 
window on current line. 


Set Paper Ink. Parameter taken 
MOD 16. Equivalent to PAPER 
command. 


Set Pen Ink. Parameter taken MOD 
16. Equivalent to PEN command. 


Delete current character. Fills 
character cell with current 
Paper Ink. 


Clear from left edge of window 
to, and including, the current 
character position. Fills 
affected cells with the current 
Paper Ink. 


Clear from, and including, the 
current character position to 
the right edge of window. Fills 
affected cells with the current 
Paper Ink. 


Clear from start of window to, 
and including, the current 
character position. Fills affected 
cells with the current Paper Ink. 
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For your reference... 


Value Name 
&14 20% DC4 


&15 21 NAK 


&16 22 SYN 


&17 28 ETB 


&18 24 CAN 
&19 25 EM 


&1А 26 SUB 


Parameter 


Otol 


0to3 


040255 
040255 
Oto 255 
Oto 255 
Oto 255 
Oto 255 
040255 
010255 
040255 


14080 
14080 
14025 
14025 


Meaning 


Clear from, and including, the current 
character position to the end of window. 
Fills affected cells with the current. 
Paper Ink. 


Turn off text screen. The screen will not 
reactto anything sent toit until after an 
АСК (&066) is sent. 


Parameter MOD 2. Transparent. 
option. 0 disables, 1 enables. 


Parameter MOD 4 

0 sets normal graphics ink mode 
1sets XOR graphics ink mode 

2sets AND graphics ink mode 
3sets OR graphics ink mode 


Exchange Pen and Paper Inks. 


Set matrix for user definable 
character. Equivalentto a 
SYMBOL command. Takes nine 
parameters. The first parameter 
specifies which character's 

matrix to set. The next eight 
specify the matrix, The most. 
significant bit ofthe first 

byte corresponds to the top left hand 
pixel ofthe character cell, the least 
significant bit ofthe last byte 
corresponds to the bottom right 
hand pixel ofthe character cell. 


Set Window. Equivalenttoa 

WINDOW command. The first two 
parameters specify the left and 

right hand edges of the window - the 
smaller value is taken as the left edge, 
the larger the right. The second two 
parameters specify the top and bottom 
edges of the window - the smaller value 
is taken as the top edge, the larger the 
bottom edge. 
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Value Name Parameter | Meaning 


&1B 27 ESC No effect. Ignored. 
&1C 28 FS 015 Set Ink toa pairofcolours. 
0to31 Equivalenttoan I NK command. 
0to31 The first parameter (MOD 16) 
specifies the Ink, the next two 
(MOD 32) the required colours. 


(Parameter values 27 to 31 are 
un-defined colours.) 


&1D 29 GS 01931 Set Bordertoa pair of colours. 
0to31 Equivalenttoa BORDER command. 
Thetwo parameters (MOD 32) 
specify the two colours. 


(Parameter values 27 to 31 are 
un-defined colours.) 


&1Е 30 RS Move cursor to top left hand 
corner of window. 


&1F 31 US 1to80 Move cursor to the given 
1to25 position in the current window. 
Equivalent toa LOCATE command. 
The first parameter gives the 
column to move to, the second 
gives the line. 


The housekeeping of the CPC664 is provided by a sophisticated real time operating 
system. The operating system ‘directs the traffic’ through the computer from the 
input to the output. 


It primarily interfaces between the hardware and the BASIC interpreter - for 
example the ink flashing function, where BASIC passes the parameters - and the 
operating system gets on with the task, with one part determining what is required 
- and the other part determining the timing of these events. 


The machine operating system is generally referred to as the ‘firmware’, and 
comprises the machine code routines that are called by the high level commands іп 
BASIC. 
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If you are tempted to POKE around іп the machine memory addresses, or CALL the 
sub-routines, save your program and listing before doing so, or you may regret it! The 
extensive operating system firmware of the CPC664 is described in SOFT 946, and is 
beyond the scope ofthis introductory user manual. 


In order to program extensively using machine code, it will be necessary to use an 
assembler. The DEVPAC assembler from AMSOFT comprises a relocatable Z80 
assembler, with editor, disassembler and monitor. 


Part 2: Interrupts 


The CPC664 makes extensive use of 780 interrupts to provide an operating system 
that includes several multi-tasking features, exemplified by the AF TER and EVERY 
structures described earlier in this manual. The precedence of the event timers is: 


Break ([ESC][ESC] 

Timer 3 

Timer 2 (and the three sound channel queues) 
Timer 1 

Timer 0 


Interrupts should be included after considering the consequences of possible 
intermediate variable states at the point of interruption. The interrupt sub-routine 
itself should avoid unwanted interaction with the state of variables in the main 
program. 


The sound queues have independent interrupts of equal priority. Once a sound 
interrupt has started, it is not interrupted by any other sound interrupt. This enables 
sound interrupt routines to share variables with immunity from the effects 
mentioned above. 


When a sound queue's interrupt is enabled (by using ON SQ GOSUB), it will 
immediately interrupt if the sound queue for that channel is not full, otherwise it will 
interrupt when the current sound ends and there is room for more in the queue. The 
action of interrupting disables the event, so the sub-routine must re-enable itself if 
further interrupts are required. 


Both attempting to issue a sound and testing the queue status will also disable a 
sound interrupt. 
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Part 3: ASCII and graphics characters 


ASCII 


The table below illustrates the standard ASCII reference character set using 
decimal, octal, and hex notation, together with the ASCII codes where appropriate. 
Each of the CPC664 character cells is also represented in detail in the following 
pages. 


DEC OCTAL HEX ASCII characters 


000 NUL (ICTRLJa) 
001 зон ЦСТАЦА) 
STX qCTRUS 
ETX((CTALIC) 
EOT (CTRL) 
ЕМО (СТАЦе 
АСК (СТАЦЕ) 
BEL (СТАЦО) 
BS (CTALH) 
HT (CTRL 
LF (CTRL) 
VrÜCTRUS 
FF СТВ), 
БШ 


8088088488%8858 


DLE (CTRUP) 
DC1 ПСТАЦО) 
бс CTRL 
OC3(CTRUS) 
DCA (СТЯЦТ) 
МАК (СТАС. 
SYN (СТВУМ 
ETB (CTRLIW) 
CAN (СТАЕ) 
EM (СТВЦҮ) 
‘SUB астяц) 
ESC 


FS 
Gs 
RS 
us 


маааугазаушаг 
инженеров 70-58 


T 
BESSSLESLSSSLSFESVSSSSISFAIAASBSLSRISIISSSLSSLSLLS 


B8?8*5REEESEEZEETZS 
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Machine specific graphics character set 


The characters reproduced here are plotted on the standard 8 
x 8 cell matrix used to write the screen of the CPC664. User 
defined characters may be grouped for special effects. and 
butted next to one another. See the section "User Defined 
Characters’ іп the chapter entitled "At your leisure....". 


32 &H20 
&X00100000 
m 


34 35 36 
&H22 &H23 &H24 
&X00100010 &X00100011 &X00100100 


37 39 40 
&H25 &H27 &H28 
&X00100101 &X00100111 &X00101000 


41 43 44 
&H29 &H2B &H2C 
&X00101001 &X00101011 &X00101100 


45 47 
&H2D. &H2E &H2F &H30 
&X00101101 &X00101110 &X00101111 &X00110000 
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2 


gm 
49 50 52 
&H31 &H32 &H33 &H34 
&X00110001 &X00110010 &X00110011 &X00110100 
r š š 
a 
53 54 55 56 
&H35 &H36 &H37 &H38 
&X00110101 &X00110110 &X00110111 &X00111000 
m 
- 
57 58 59 60 
&H39 &H3A &H3B &H3C 
&X00111001 8Х00111010 &X00111011 &X00111100 
m 
61 62 
&H3D &H3E &H3F &H40 
8Х00111101 &X00111110 &X00111111 &X01000000 


; Wh & 


š mi 
и! 
65 66 67 68 
&H41 &H42 &H43 &H44 
&X01000001 &X01000010 &X01000011 &X01000100 
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69 
&H45 
&X01000101 


&X01001001 


77 
&H4D 
&X01001101 


81 


&H51 
&X01010001 


85 
&H55 
&X01010101 


70 


&H46 
&X01000110 


7 
&H4A 
8Х01001010 


ы 
8Х01001110 


82 
&H52 
&X01010010 


86 
&H56 
&X01010110 


72 
&H48 
&X01001000 


76 


&HAC 
&X01001100 


80 
&H50 
&X01010000 


&H54 
&X01010100 


&H58 
8Х01011000 


For your reference.... 


Chapter 7 Page 11 


89 
&H59 
8Х01011001 


өз 
&HSD 
&X01011101 


101 
&H65 
&X01100101 


105 
&H69 
&X01101001 


&H5A 
&X01011010 


94 
&HSE 
&X01011110 


&H62 
&X01100010 


&X01101010 


9 92 
HSB HSC 


ы ы 
&X01011011 &X01011100 


95 
&H5F 
8Х01011111 


8Х01100100 
- 
104 
&H67 &H68 
&X01100111 &X01101000 


107 
&HeB 
&X01101011 &X01101100 
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112 
&H6E &H6F &H70 
&X01101110 &X01101111 &X01110000 


113 114 115 116 
&H71 &H72 &H73 &Н74 
8Х01110001 &X01110010 &X01110011 &X01110100 


117 118 119 120 
&H75 &H76 &H77 &H78 
&X01110101 &X01110110 &X01110111 &X01111000 


123 124 
&H7B &H7C 


&X01111011 &X01111100 
125 126 127 128 
&H7D. &H7E &H7F &H80 
&X01111101 &X01111110 &X01111111 &X10000000 
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133 136 
&H85 al &H88 
&X10000101 &X10000110 &X10000111 &X10001000 


137 138 139 

&H89 &H8A &H8B 

&X10001001 &X10001010 &X10001011 &X10001100 
š 

141 142 144 

&H8D &HBE &H8F &H90 

&X10001101 &X10001110 &X10001111 &X10010000 


145 146 147 148 
&H91 &H92 &H93 &H94 
&X10010001 &X10010010 &X10010011 &X10010100 
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&H98 
&X10011000 


156 
&H9C 
&X10011100 


&X10100000 


164 
&HA4 
&X10100100 


168 
&HAB 
&X10101000 
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169 
&HA9 
&X10101001 


173 
&HAD 
&X10101101 


Г 
H 
H 


177 
&HB1 
8Х10110001 


181 
&HB5 
&X10110101 


171 
&HAB 
&X10101011 


182 
&HB6 
&X10110110 


&HB9 
&X10111001 


186 
&HBA 
&X10111010 


&X10101111 


179 
&HB3 
&X10110011 


183 
&HB7 
&X10110111 


187 
&HBB 
&X10111011 


172 
&НАС 
&X10101100 


180 
&HB4 
8Х10110100 


184 
&HB8 
&X10111000 


188 
&HBC 
&X10111100 


Chapter 7 Page 16 


For your reference... 


189 190 
&HBD &HBE 
&X10111101 


&HC2 


197 
&HC5 
&X11000101 


202 
&HCA 


&X11001001 


205 
&HCD 
&X11001101 


&X10111110 


&X11000010 


&X11001010 


&HCE 
&X11001110 


199 
&HCT 
&X11000111 


Ë: 


203 
&HCB 
&X11001011 


z 


207 
&HCF 
8Х11001111 


&HCB 
&X11001000 


204 
&HCC 
&X11001100 


208 
&HDO 
&X11010000 
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213 
&HDS 
&X11010101 


217 
&HD9 
&X11011001 


= 


221 
&HDD 
8Х11011101 


гі 


225 
&HE1 
8Х11100001 


210 211 
&HD2 &HD3 


&X11010010 &X11010011 &X11010100 
" Ë 
п! 
TT 
214 215 216 
&HD6 &HD7 &HD8 
&X11010110 &X11010111 &X11011000 
219 220 
&HDB &HDC 
&X11011010 &X11011011 &X11011100 
222 
&HDE 
&X11011110 


226 227 228 
&HE2 &НЕЗ &HE4 
&X11100010 &X11100011 &X11100100 
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229 230 


&HES. &HE6 

&X11100101 8Х11100110 
іш 

233 234 

&HE9 &HEA 

8Х11101001 8Х11101010 


237 

&HED &HEE 

&X11101101 &X11101110 
ишш! 

241 242 

&HF1 &HF2 

&X11110001 &X11110010 

HI 

245 246 

&HF5 &HF6 

&х11110101 8Х11110110 


&HEB 
&X11101011 


239 
&HEF 
&X11101111 


8Х11110111 
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&HE8 
8Х11101000 


236 
&HEC 
8Х11101100 


240 
&HF0 
&X11110000 


&HF4 


&HF8 
&X11111000 
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249 251 252 
&HF9 &HFA &HFB &НЕС. 
&X11111001 &X11111010 &X11111011 &X11111100 


253 254 
&HFD &HFE &HFF 
&X11111101 &X11111110 &X11111111 
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Part 4: Key references 


Default ASCII values 


10 
с ЗУН 


—p 
H 


=] ШШ ЖШШЕ 


ашыды улы 
7 (1 885 [3D [88] (89 [8] [8] (8 (8) 


ШЕШ 


[5 (8) [8 (5 (8) (5 B] (8 
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Expansion characters, 
defaultlocationsand 
values 


2) [x] [c] [v] [в] [м] [м] [z] (3] 2] С 


ПШ 
тав | [о] iw] [Е] [R] [т] [v] [o] [1] [o] [P] [3] (£] 


ZR] [А] [s] [6] [Е] [6] H] [4] К) [t] [* 


(ENTER) жор 
12040 RUN"[ENTER] | &52&55&4E 822 &0D. 


SHIFT 


Note: Expansion characters 13 to 31 (141 to 156) have a null 
value by default. They have values assigned using the 
BASIC command KEY, and are assigned to keys using tho. 
command KEY DEF 
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СУС 


e] [s] [e] [e] 


Key and joystick numbers 
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Part 5: Sound 
Notes and tone periods 


The table which follows, gives the recommended -tone period, settings for notes in the 
usual even tempered scale, for the full eight octave range. 

The frequency produced is not exactly the required frequency because the «опе 
period: setting has to be an integer. The RELATIVE ERROR is the percentage ratio 
of the difference between the required and actual frequency. 


NOTE FREQUENCY > PERIOD RELATIVE ERROR 
c 32.703 3822 -0.007% 
CH 341648 3608 *0:007x 
5 36.708 3405 -0.007% 
DH 381891 3214 -0.004% 
E 41.203 3034 +019097 
Е 43.654 2863 -0.016% Octave -3 
FH 461249 2703 +0.009% 
в 48.999 2551 -0.002% 
GH 51.913 2408 +0.005% 
A 55:000 2273 +@0:@12% 
AR 58.270 2145 -0.008% 
B 611735 2025 +010115 
NOTE FREQUENCY PERIOD RELATIVE ERROR 
с 65.406 1911 -0.007% 
CH 691296 1804 +0.007% 
5 731416 1703 +0.022% 
bh 771782 1607 -0.004% 
E 82.407 1517 +0.009% 
F 87.307 1432 +0019% Octave -2 
ЕН 921499 1351 -0.028% 
в 97.999 1276 +0.037% 
6# 103.826 1204 +0:005% 
A 110.000 1136 -0.032% 
АЙ 1161541 1073 «0.0395 
в 1231471 1012 -0.038% 
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NOTE FREQUENCY PERIOD RELATIVE ERROR 


c 130.813 956 *8.046x 
cH 138.591 982 +0.007% 
D 146.832 851 -0.037% 
DF 155.564 864 %0.058Х 
Е 164.814 758 -0.057% 
F 174.614 716 %0.019Х Octave -1 
FH 184.997 676 *0.046X 
6 195.998 658 +0.037% 
GH 207.652 682 %0.005х 
А 220.000 568 -0.052Х 
ди 233.082 536 -0.055% 
в 256.942 586 -0.038% 
NOTE FREQUENCY PERIOD RELATIVE ERROR 
с 261.626 478 +@.046% Middle С 
CH 277.183 451 %0.007Х 
5 293.665 &26 %0.081% 
Im, 311.127 482 *0.058x 
E .628 -0.057Х 
Е 349.228 358 %0.019% puta; 0 
FK — 369.994 338 +0.646% 
6 391.995 319 %0.037Х 
GH 115.305 301 +0.085% 
А 448.008 284 -0.032% International a 
At 466.164 268 -0.055% 
B 493.883 253 -0.038% 
NOTE FREQUENCY PERIOD RELATIVE ERROR 
с 523.251 239 046% 
CH 554.365 225 12157 
D 587.330 213 %0.081Х 
DH 622.254 201 %0.0587 
Е 659.255 198 %0.2й6Х 
Е 698.457 179 *0.019x Octave 1 
FA 739.989 169 %0.046Х 
6 783.991 159 -0.277% 
GH 830.609 150 -0.328% 
A 880.000 142 -0.032% 
A# 932.328 134 -0.055% 
B 987.767 127 %0.356% 
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МОТЕ FREQUENCY PERIOD RELATIVE ERROR 
[4 1046.502 119 -0.374% 
c# 1188.731 113 +012291 
D 1174:659 186 -8:3990x 
b# 1244.508 188 -0.441% 
E 1318.510 95 +0.206% 
F 1396.913 89 -8.543X Octave 2 
ЕН 1479.978 84 -0.548% 
G 1567.982 88 +8.350% 
GH 1661.219 75 -0.328% 
A 1760.000 71 -0.032% 
A# 1864.655 67 -0.055% 
B 1975.533 63 -8.435% 
NOTE FREQUENCY PERIOD RELATIVE ERROR 
с 2093.004 68 +8. 462% 
CH 2217.461 56 -0.662% 
D 2349.318 53 -0.390% 
ои 2489.016 54 -0.441% 
Е 2637.021 47 -0.855% 
F 2793.826 45 +015741 
Ей 2959.955 42 -0.548% Octve.d 
6 3135.963 40 +й:350% 
6# 3322.438 38 %0.992Х 
A 3520.000 36 +11357% 
АН 3729.310 34 +11517% 
в 3951.066 32 +1:134% 
NOTE FREQUENCY PERIOD RELATIVE ERROR 
с 4186.009 30 +0.462% 
си 4434.922 28 -0.662% 
2 4698.636 27 +1.469% 
ой 4978.032 25 -0.441% 
Е 5274.041 24 +11246% 
F 5587.652 22 -1.685% 
FH 5919.911 21 -0.548% Оше 4 
G 6271.927 28 %0:350% 
GH 6644.875 19 +B.992% 
A 7040.000 18 %1.357Х 
АЯ 7458.621 17 %1.817Х 
в 7902.133 16 +1.134% 


The above values аге all calculated from International A as follows: 


FREQUENCY = 440*(2 | COCTAVE* CCN- 100/1200) 
PERIOD = ROUND (125600 / FREQUENCY) 


where N is 1 for C, 2 for СЁ, 3 for D, etc. 


Chapter 7 Page 26 For your reference... 


Part 6: Error messages 


1 Unexpected NEXT 


А NEXT command has been encountered while not in a F0R loop, or the control 
variable in the NE XT command does not match that in the FOR. 


2 Syntax Error 


BASIC cannot understand the given line because a construct within it is not legal. 


3 Unexpected RETURN 


A RETURN command has been encountered when not in a sub-routine. 


4 DATA exhausted 
A READ command has attempted to read beyond the end of the last DATA. 


5 Improper argument 


This is a general purpose error.The value of a function’s argument, or a command 
parameter is invalid in some way. 


6 Overflow 


The result of an arithmetic operation has overflowed. This may be a floating point 
overflow, in which case some operation has yielded a value greater than 1.7E 1 38 
(approx.). Alternatively, this may be the result of a failed attempt to change a 
floating point number to a 16 bit signed integer. 


7 Memory full 


The current program or its variables may be simply too big, or the control structure is 
too deeply nested (nested GO SUBs, WH I LEsor F ORs). 


A MEMORY command will give this error if an attempt is made to set the top of 
BASIC's memory too low, or to an impossibly high value. Note that an open file has a 
buffer allocated to it, and that may restrict the values that MEMORY may use. 
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8 Line does not exist 


The line referenced cannot be found. 


9 Subscript out of range 


One of the subscripts in an аттау reference is too big or too small. 


1@ Array already dimensioned 


One of the arrays in a D IM statement has already been declared. 


11 Division by zero 


May occur in real division, integer division, integer modulus or in exponentiation. 


12 Invalid direct command 


The last command attempted is not valid in direct mode 


13 Туре mismatch 


А numeric value has been presented where a string value is required or vice versa, ог 
an invalidly formed number has been found in READ or INPUT. 


14 String space full 


So many strings have been created that there is no further room available, even after 
‘garbage collection’. 


15 String too long 


String exceeds 255 characters in length. May be generated by appending strings 
together. 


16 String expression too complex 


String expressions may generate a number of intermediate string values. When the 
number of these values exceeds a reasonable limit, this error results. 
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17 Cannot CONTinue 

Forone reason or another the current program cannot be restarted using CONT, Note 
that CONT is intended for restarting after a STOP command, [ESC] [ESC], or an 
error, and that any alteration of the program in the meantime makes a restart. 
impossible. 


18 Unknown user function 


No DEF FN hasbeen executed for the FN just invoked. 


19 RESUME missing 


The end of the program has been encountered while in error processing mode (i.e. in 
an ON ERROR GOTO routine). 


20 Unexpected RESUME 


RESUME is only valid while in error processing mode (1.е.іпап ON ERROR GOTO 
routine). 


21 Direct command found 


When loading a file, a line without a line number has been found. 


22 Operand missing 


BASIC has encountered an incomplete expression. 


23 Line too long 


Aline when converted to BASIC internal-form becomes too big. 


24 EOF met 


Anattempt has been made to read past end ofthe file input stream. 


25 File type error 


Тһе file being read is not of a suitable type. OPENIN is only prepared to open ASCII 
text files. Similarly, LOAD, RUN, etc, are only prepared to deal with file types 
produced by SAVE. 
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26 NEXT missing 


Cannot find a NEXT to match a ҒОВ command. À line number accompanying this 
message indicates the F OR command to which this error applies. 


27 File already open 


An OPENINorOPENOUT command has been executed before the previously opened 
filehas been closed. 


28 Unknown command 


BASIC cannot find a taker for an external command, i.e. a command preceded by a 
bar! 


29 WEND missing 


Cannot find a WEND to match a WH I LE command. 


30 Unexpected WEND 


Encountered a WEND when not in a WHILE loop, or a WEND that does not match the 
current WHILE loop. 


31 File not open 


(See the section ahead entitled ‘Disc errors'.) 


32 Broken in 


(See the section ahead entitled ‘Disc errors'.) 


Disc errors 


There are several errors that may occur during the processing of any filing 
operations. BASIC handles all such errors as ERRor number 32, however more 
specific information may be returned by the function DERR when this error number 
is detected. This returns values as follows: 
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AMSDOSerror DERR value Cause oferror 


0 Bor22 {ESC] has been pressed. 

14 142(128+14) Thestreamisnot ina suitable state. 

15 143 (128+15}  Hardend of file has been reached. 

16 144(128+16) Badcommand, usually an incorrect 
filename. 

17 145 (128+17)  Filealready exists. 

18 146(128+18) File does not exist. 

19 147(128+19) Directory is full. 

20 148(128+20)  Discisfull. 

21 149 (128+21)  Discchanged while files were open. 

22 150(128«22) FileisRead/Only. 

26 154(128+26) Soft end of file has been detected. 


If AMSDOS has already reported an error, then bit 7 is set; hence the value of DERR 
isoffsetby128. = x f 


Other values returned by DERR originate from the disc controller and are bit 
significant, always with bit 6 set. Bit 7 indicates whether the error has been reported 
by AMSDOS (as explained above). The significance of each bit is as follows: 


Significance 


Address mark missing. 
Not writable - disc is write protected. 
No data - can't find the sector. 


Drive not ready - no disc in the drive. 

Overrun error. 

Паѓа error - CRC error. 

Alwayssetto 1 to indicate error from disc controller. 
Set to 1 iferror has already been reported by AMSDOS. 
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ERR may also return 31 if access was attempted when no file was open. The usual 
way in which one may use ERR and DERR would be to include an ON 
ERROR GOTO which calls a short routine that checks if ERR has the value 31 or 
32, and if it is 32, DERR could be interrogated to give more detailed information 
regarding the nature ofthe error. For example: 


10 ON ERROR GOTO 1000 

20 OPENOUT "myfile.asc'" 

30 WRITE 49,"test-data" 

40 CLOSEOUT 

50 END 

1000 amsdoserr=(DERR AND &7F):REM mask off bit 7 

1010 IF ERR<31 THEN END 

1020 IF ERR-31 THEN PRINT "are you sure you've typed 
Line 20 correctly?" : ЕМО 

1030 IF amsdoserr=2@ THEN PRINT "disc is full, suggest 
you use a new data disc":END 

1840 IF amsdoserr-&X01081000 THEN PRINT "put a disc in 
the drive, then press a key":WHILE INKEYS 3"; 
WEND: RESUME = 

1050 END 


Part 7: BASIC Keywords 


The following is a list of all AMSTRAD CPC664 BASIC keywords. As such, they are 
reserved and can NOT be used as variable names. 


ABS, AFTER, AND, ASC, ATN, AUTO 
BINS, BORDER 


CALL, CAT, CHAIN, CHR$, CINT, CLEAR, CLG, CLOSEIN, CLOSEOUT, CLS, 
CONT, COPYCHRS, COS, CREAL, CURSOR 


DATA, DECS, DEF, DEFINT, DEFREAL, DEFSTR, DEG, DELETE, DERR, DI, 
DIM, DRAW, DRAWR 


EDIT, EI, ELSE, END, ENT, ENV, EOF, ERASE, ERL, ERR, ERROR, EVERY, 
EXP 


FILL, FIX, FN, FOR, FRAME, FRE 
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GOSUB, GOTO, GRAPHICS 

HEX$, НІМЕМ 

IF, INK, INKEY, INKEYS, INP, INPUT, INSTR, INT 

JOY 

KEY 

LEFTS, LEN, LET, LINE, LIST, LOAD, LOCATE, LOG, L0G10, LOWERS 
MASK, MAX, MEMORY, MERGE, MIDS, MIN, MOD, MODE, MOVE, MOVER 
NEXT, NEW, NOT 


ON, ON BREAK, ON ERROR GOTO Ø, ON SQ, OPENIN, OPENOUT, OR, 
ORIGIN, OUT 


PAPER, PEEK, PEN, PI, PLOT, PLOTR, POKE, POS, PRINT 


RAD, RANDOMIZE, READ, RELEASE, REM, REMAIN, RENUM, RESTORE, 
RESUME, RETURN, RIGHTS, RND, ROUND, RUN 


SAVE, SGN, SIN, SOUND, SPACES, SPC, SPEED, SQ, SQR, STEP, STOP, 
STR$, STRINGS, SWAP, SYMBOL 


TAB, TAG, TAGOFF, TAN, TEST, TESTR, THEN, TIME, TO, TROFF, TRON 
UNT, UPPERS, USING 

VAL, VPOS 

WAIT, WEND, WHILE, WIDTH, WINDOW, WRITE 

XOR, XPOS 

ҮР05 


10МЕ 
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Part 8: Planners 
Text and window planner - MODE 0 (20 columns) 


E 
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Text and window planner - MODE 1 (40 columns) 
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Text and window planner - MODE 2 (80 columns) 


For your reference... 


Chapter 7 Page 36 


Sound envelope/music planner 
IEEE: ЕЕ Е 
ЕН КЕҢІНЕН H 
si ipd His 
Hi E: НН HE H HHH! m 
H H H 33 H 
ШЕ mu H 
B H БЕ ЕНШ IH 
H H i H H H I 
+ T HH Hi 
H i И 
HI H 
+ H 
ss HH 
5 НЕ | В 
Н ТІ i 
H H: 5 sa Hi i Hi 
шт + ii i H 
HH H H H 
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12 


no 


ло 


E] 


Part 9: Connections 


CPC664 Input/Output Sockets 


Joystick Socket 


VIEWED FROM REAR 


PIN PING FIRE 2 
PIN 2 PIN 7 FIRE 1 
PIN 3 LEFT PIN 

PIN 4 RIGHT [имэ Сом 2 
PIN 5 ді 


Chapter 7 Page 38 For your reference.... 


Monitor Socket т 


VIEWED FROM REAR 


GNO 
tom 
Stereo Socket 
T 
Стю ие 
| | РЫ 
оло ur 


VIEWED FROM ВЕАВ 
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Expansion Socket 


VIEWED FROM REAR 


PIN 18 A0 35 
PIN 19 07 36 
PIN 20 06 37 
PIN 21 05 38 
PIN 22 04 E] 
PIN 23 03 40 
PIN 24 02 
PIN 25 01 PIN 42 
PIN в 00 PIN 43 
PIN 27 45v PIN 44 
PIN 28 МНЕ PIN 45 
PIN 29 Mi PIN 46 
PIN 30 — RFSH PIN 47 
PIN зт іва PIN ав 
PIN 32 RD PIN 49 
50 


E 
8 
B 
E 


2 
z 
g 
z 
E 
q 


Disc Drive 2 Socket 


VIEWED FROM REAR 


2 а 6 в 10 12 14 16 18 20 22 24 26 28 30 32 34 


зз 5 7 9 п 13 ® T э 21 23 25 27 29 З 33 


| 


PIN24 GND 
PIN2S МС 
PIN2S Оно 
PIN27 INDEX 
7 
Pm29 МС 
PIN30 Омо 
PINS) м/с 
PIN32 Омо 
PNG3 м/с 
смо 
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Printer Port 


VIEWED FROM REAR 


ne мм з un w э s 7 66 4 352/34 


зом 3 X з юз Bon m5 Xon алю "w 


PIN 
PIN 
PIN 
PIN 
PIN 
PIN 


PIN 
PIN 
PIN 
PIN 
PIN 
АП other рім NC 


Part 10: Printers 
Printerinterfacing 


The CPC664 allows the connection and use of an industry standard ‘Centronics style 
interface' printer. 


The printer cable is simply constructed as a one-to-one connection between the 
PRINTER socket at the rear of the computer, and the connector on the parallel 
printer. Note that there are two less ‘fingers’ on the computer printed circuit board 
than on the printer connector. This is to allow the use of a standard printed circuit 
board edge connector. 


The actual pin interface details are illustrated in part 9 of this chapter. 


The cable should be constructed so that pin 1 from the computer connects to pin 1 on 
the printer; pin 19 from the computer to pin 19 on the printer, etc, etc. However, pins 
18 and 36 of the printer should NOT be connected to the computer. 
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Note that although there аге 17 fingers оп the upper row of the computer's PRINTER 
Socket, the lower row of fingers is numbered 19 onwards (rather than 18 onwards). 
This is so that every wire used, connects between exactly the SAME NUMBERED 
finger ofthe computer's edge connector as pin ofthe socket on the printer itself. 


The computer uses the BUSY signal (pin 11) to synchronise with the printer, and will 
wait ifthe printer is OFF-LINE. 


There are no user set-up commands required, and the output is directed to the printer 
by specifying stream #8. 


Although the CPC664's PRINTER port is envisaged for use with low cost dot-matrix 
printers; with a suitable interface it will support daisywheel printers, graphics 
plotters, and multi-colour ink-jet printers. The key to compatibility is the standard 
parallel interface. 


The customised software in the AMSTRAD DMPI printer facilitates dot-graphics 
operation, together with the printing of complete screen dumps. 


Printer configuration 


A facility is provided whereby special characters which may appear on the screen and 
which are supported by the AMSTRAD DMP1, will be printed even though the 
character codes for the screen and printer may be different. The majority of these 
symbols will only be available when the printer is switched to one of its foreign 
language modes. For example: 


PRINT СНН5(%А0) 
A 


PRINT #8,CHRS(&AQ) 
^ isprintedon the printer. 


This works even though the character code for a circumflex accent on the DMP1 is 
&5E. In other words, the printer routine has recognised & À as one of the codes held 
ina printer translation table, and has translated it to &5 E so that the same character 
appearing on the screen will be printed by the printer. The code 85 E will produce a 
circumflex accent on a DMP1 no matter which language mode the printer is set to 
(this is not true for all the characters in the translation table). The other characters in 
the table are as shown in the following table: 
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CHR$ m— Printer | U.K. 0.5.А.| France) Germany | Spain 


OnScreen| Translation 


“А0 
&A2 
&A3 
&A6 
&AE 
&AF 


©} 


+ For the printed character, refer to page 18 of your DMP1 instruction manual. 


The above is an extract from the default translations, which can be changed if 
required. See the Firmware manual (SOFT 946) for further details. 


Part 11: Joysticks 


The built-in software in the computer supports either one or two joysticks. These are 
treated as part of the keyboard, and as such, may be interrogated by INKEY and 
INKEYS 


Note that in the majority of cases, the main ‘fire’ button on a joystick is interpreted as 
‘Fire 2’ by the CPC664. 


The functions JOY (Ø) and JOY (1) enable direct inspection of the first and second 
joysticks repectively. The function returns a bit-significant result which indicates 
the state of the joystick switches at the last keyboard scan. 


The table below indicates the values returned by both joysticks. The J OY values are 
followed by values for use in statements which take key numbers as parameters (i.e. 
INKEYand KEY DEF). 


JOY COMMAND KEY VALUES 


BIT VALUE FIRST SECOND EQUIVALENT 
SET |RETURNED| JOYSTICK | JOYSTICK KEY 
Up 0 1 72 48 % 
Down 1 2 73 49 % 
Left 2 4 74 50 R 
Right 3 8 15 51 T 
Fire2 4 16 16 52 € 
Fire1 5 32 77 53 ғ 
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Note that when key values for the SECOND joystick аге returned, the computer 
cannot tell whether those values have been generated by the joystick or by the 
equivalent keyboard key (indieated in the last column of the previous table). This 
means that the keyboard сап be used as a substitute for the second joystick. 


Part 12: Disc organisation 


'The BIOS supports three different disc formats: SYSTEM format, DATA ONLY 
format and IBM format. Under AMSDOS, the format of a disc is automatically 
detected each time a disc with no open files is accessed. To permit this automatic 
detection, each format has unique sector numbers. 


З inch discs are double sided, but only one side may be accessed at a time depending on 
which way round the user inserts the disc. There may be a different format on each 
side. 


Common to all formats: 


Single sided (the two sides ofa 3 inch disc are treated separately). 
512 byte physical sector size. 

40 tracks numbered 0 to 39. 

1024 byte CP/M block size. 

64 directory entries. 


SYSTEM format 


9 sectors per track numbered &41 to &49. 
2 reserved tracks. 


The system format is the main format supported, since CP/M can only be loaded (cold 
and warm boot) from a system format disc. The reserved tracks are used as follows: 


Track 0 sector &41 :boot sector. 
“Track 0 sector &42 : configuration sector. 
Track 0 sectors &43 to &47 :unused. 

Track 0 sectors &48 to &49 š 
Tradkisetor&ilto&49 ; } CCPand BDOS. 


Note that VENDOR format is a special version of system format which does not 
contain any software on the two reserved tracks. It is intended for use in software 
distribution. 
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DATA ONLY format 


9 sectors рег track numbered &C1 to &C9. 
O reserved tracks. 


This format is intended for future enhancement. It is not recommended for use with 
CP/M since it is not possible to ‘warm boot’ from it. However, if only AMSDOS is to be 
used, the DATA ONLY format affords a little more disc space. 


IBM format 


Bsectors per track numbered &1 to &8. 
lreserved track. 


This format is logically the same as the single-sided format used by CP/M on the IBM 
PC. It is intended for specialist use and is not otherwise recommended. 


Part 13: Memory 
Memory Map 
&FFFF 
AMSDOS « FIRMWARE « > SCREEN RAM 
ROM ROM 
&C000 
&BFFF 
> FIRMWARE DATA AREA 
JUMP BLOCK 
BASIC DATA AREA 
AMSDOS DATA AREA 
OTHER EXPANSION- 
ат? ROMS' DATA AREA 
> USER DEFINED CHARACTER: 
HIMEM 
> BASIC PROGRAM AREA 
&4000 
&3FFF 
BASIC FOREGROUND ROM « & > BASIC PROGRAM AREA 
&0000 


...where address &???? is dependent upon expansion ROMs. (Note that &???? is 
&A6FC when no external expansion ROMs are fitted.) 


For your reference... Chapter 7 Page 45 


Additional /O 


Most I/O port addresses are reserved by the computer, in particular addresses below 
&TFFF should not be used at all. 


It is intended that the part of the address А0 - A7 should reflect the type of external 
T/O device, and that address lines A8 and A9 may be decoded to select registers within 
the ГО device. Of the remaining address lines, only A10 must be decoded (as low) 
whilst lines A11 to A15 are high. Thus each device may have registers addressed as 
&F8?, &F9??, &FA??, and &FB??, where ?? is in the range DC to DF for 
communications interfaces, and E0 to FE for other user peripherals. 


Note that Z80 instructions which place the B register on the upper half of the address 
bus (A15- AB) must be used. 


Sideways ROMs 


Provision is made for additional ROMs to be selected in place of any part of the 
on-board ROM. The address arbitration and bank selection logic will be contained in 
a module connected to the expansion bus, but all the signals required are brought to 
theexpansion bus. 
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Chapter 8 
At yourleisure 


This chapter takes a leisurely look at some background 
information to computing in general, and at the CPC664 in 
particular. It is not vital that you read this chapter before 
operating the computer, but it may help you to understanda little 
of what's going on ‘under the bonnet’. 


Part 1: Generally speaking.... 


Zap the wotsit! 


Even if the only reason that you bought your CPC664 was to take advantage of the 
sophisticated computer games available, you may still probably be wondering about. 
several aspects ofthe computer that come under the heading of ‘hardware’. 


The hardware is what you can pick up and carry around, i.e. the main computer 
keyboard, the monitor, the connecting leads ete. In fact, it’s just about everything 
that isn’t specifically the ‘software’ - programs, manuals, and disc or cassette based 
information. 


Certain features of the way that the computer behaves, are produced by courtesy of 
the hardware - things like the coloured display on the TV set (or monitor). It’s up to 
the software to make use of these hardware capabilities to produce specifically 
designed characters and shapes on the screen. 


The hardware actually directs the beam of electrons at the electro luminescent 
surface on the inside of the screen of the TV tube to make it ‘light up’ - the software 
adds order and intelligence by telling the hardware when and how to perform. It adds 
timing, control and sequencing to produce the effect of a spaceship taking off, or 
something more mundane like a letter appearing when you type at the keyboard. 


So what makes one computer better than another? 


Hardware without software is worthless. Software without hardware is equally 
worthless - the value of the computer begins when the two come together to perform 
various tasks. There are some very basic considerations that can be used to grade 
performance of both hardware and software. 
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Тһе generally accepted reference points Гог personal computers аге now: 


1. Thescreenresolution - the smallest discernible item on the 
display. 


This is a combination of factors, including the number of different colours available to 
the programmer, the number of distinctly different areas that can be resolved on the 
display (i.e. the pixels), and the number of text characters that can be qisplayeq ona 
single screen area. 


You will find that your CPC664 compares very favourably with any similarly priced 
machine in each of these respects. 


2. The BASIC interpreter 


Virtually every home computer includes with it a BASIC interpreter that allows the 
user to start creating programs to use the hardware features. The built in 
programming language (BASIC) that comes supplied with your machine is itself a 
program - an immensely complicated and intricate program that has been evolved 
over a million man-years of experience since BASIC was ‘invented’ in the USA. The 
‘Beginners’ All-purpose Symbolic Instruction Code’ is easily the most widely used 
computer language in the world, and like any language, it comes іп а variety of local 
‘dialects’. 


The version in the СРС664 is one of the most widely compatible dialects of BASIC, 
and will also run programs written for operation under the CP/M disc operating 
system. It is a very fast implementation of BASIC - in other words it performs its 
calculations quickly - and whilst you may not be too concerned that one computer 
may take 0.05 of a second to multiply 3 by 5 and display the answer, whereas another 
may take 0.075 second to do the same - where a program that draws graphics patterns 
on the screen may call for many thousands of simple repetitive calculations, the 
difference between 0.05 and 0.075 of a second adds up to a considerable difference in 
performance. 


You will frequently hear the term ‘machine code’ being used. Machine code is the raw 
form of instruction code that can be passed to the processor. It takes less time to work 
out what it’s been asked to, and gets on with producing the result some 5 to 15 times 
faster than an equivalent operation being passed along through the BASIC 
interpreter. On the other hand, it can take 5 to 50 times longer to write an equivalent 
program in machine code when compared to performing the same overall task using 
BASIC. 
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Тһе BASIC in your Amstrad computer is amongst the fastest and most fully featured 
to be found in any home computer system. and imcorporates many features that help 
the experienced BASIC programmer overcome some of the inherent sluggishness of a 
‘high level language’ interpreter to perform surprisingly dynamic visual and musical 
effects. I 


3. Expansibility 


Most computers pay attention to the need to ‘add-on’ additional items af 
printers, joysticks, extra disc drives. Paradoxically, some of the most succe: 
computers require the addition of add-on units known as ‘expansion interfaces’ before 
evena simple printer or joystick controller can be installed 


The purchaser does not always think ahead to his needs in the future, because a 
machine that incorporates a properly supported parallel printer (Centronics 
compatible) and a games joystick port may actually be cheaper in real terms. 


Тһе CPC664 computer features a built-in Centronics printer port, a port for an 
additional disc drive, a cassette data (+ motor control) socket, facilities for up to two 
joysticks, a stereo sound output - and a comprehensive expansion bus that can be used 
to attach serial (RS232) interfaces, MODEMS, speech synthesisers, light pens, etc. 


4. Sound 


Тһе sound features of a computer determine whether or not it sounds like a bluebottle 
in a empty cocoa tin - or if it can produce an acceptable representation of an electronic 
musical instrument. 


The CPC664 computer uses a 3 channel 8 octave sound gencrator, which can produce 
a very acceptable musical quality with full control of the amplitude and tone 
envelopes. Furthermore, the sound is divided into a stereo configuration, where one 
channel provides the left output, one channel provides the right output, and the third 
channel sits in the middle. 


This provides considerable scope for writing programs that track the sound effects 
across the screen to follow the motion of an arcade-style game. 


Ultimately, you will make up your own mind about which of these features is most 
important to you. We hope that you will try them all to make the most of your 
computer. 
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Why can't? 


With all the power of modern technology, users frequently wonder why even a 
machine as advanced as the CPC664 is apparently unable to perform tasks seen on 
any TV set. Why for instance, can't a computer animate a picture of someone walking 
across the screen in a natural fashion? - why do all computers represent movement 
with ‘matchstick’ figures? 


The answer is simple yet complex. The simple answer is that you must not be 
beguiled into believing that the screen of your computer has anything of the subtlety 
of the screen of a TV set. A television set operates using ‘linear’ information that can 
describe a virtually infinite range of resolution between the extremes of light and 
dark across all the colours of the spectrum. This process means that in computer 
terms, the display ‘memory’ ofa full TV picture is some twenty times greater than the 
converted equivalent of a home computer display. 


That's only part of the problem, since to animate this picture requires that this 
enormous amount of memory must be processed at high speed (around 50 times each 
second). It can be done - but only by machines that cost a few thousand times more 
than a home computer, at least for the time being! 


Until the price of high speed memory falls dramatically (it will eventually), small 
computers have to make do with a relatively small amount of memory available to 
control the screen display, which results in lower resolution, and jerkier movements. 
Thoughtful hardware design and good programming can go a long way to making the 
best of this situation, but we are still a fair way from cheap computers that can 
reproduce flowing motions and lifelike pictures in the same way that even a moderate 
animated cartoon can produce. 


That keyboard looks familiar... 


Why can’t you simply walk up to the computer type a page of simple text into the 
machine? 


Don’t be mislead by the fact that the computer looks like a typewriter with an 
electronic display. The screen is not a piece of electronic paper - it's a ‘command 
console’ - jargon which means that it simply provides you with the means of 
communicating with the programming language (and the programs) in the machine 
memory. 


Until you tell it to the contrary, the computer will try and interpret all the characters 
that you type at the keyboard as being program instructions. When you press the 
[ENTER] key, the computer will look through what has been typed, and if it doesn’t 
make sense to the built in BASIC, it will reject the ‘input’ with the comment: 


Syntax error 
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However, it may just happen that the program presently residing in your computer is 
a Word Processor system, in which case you will be able to type random words, press 
[ENTER] and carry on typing as if the system WERE operating as an electronic piece 
of paper in an electronic typewriter. But to do this, you must have first loaded a word 
processor program into the machine's memory. 4 


The computer 'seems' to combine several items of equipment that have become 
familiar around the home and office such as the TV-like screen and the keyboard 
You must remember that the similarities are generally strictly superficial, and that 
the computer is a combination of familiar looking hardware that has an entirely 
different personality ofits own! 
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Whose afraid of the jargon? 


As with all ‘specialist’ industries, computing has developed its own jargon as a 
short-hand form of communicating complicated concepts that require many words of 
‘plain language’ explanation. It's not just the high technology business that’s guilty 
of hiding itself behind an apparent smokescreen of ‘buzz words’, jargon and 
terminology - most of us have come up against the barriers to understanding erected 
by all the main professions and trades. 


A major difference is that the confusion in legal jargon arises from the way the words 
are used - rather than the words themselves as in the case of computing. Most people 
who grow familiar with computing terminology will go out of their way to use the 
words in the most straightforward possible manner, so as to minimise the complexity 
of the communication. Don't be mislead by the ‘plain language’ used in computing, it 
is not a literary subject, but a precise science, and apart from the ‘syntax’ of the 
wording, the structure of the communication is very straightforward, and not in the 
least confusing or ambiguous. Teachers of computing have not yet managed to make 
an art form out of trying to analyse the exact meaning intended by a programmer in 
his program construction. 


Having said that, despite whether or not the meaning of a computer program is 
obvious, there are still many aspects that can be analysed as either elegant or untidy, 
and more emphasis is being put on a formal approach to program construction, now 
that the initial mayhem brought about the micro revolution is settling down. 


Computing is rapidly being understood by many young people who appreciate the 
precision and simplicity of the ideas and the way they can be communicated - you 
don’t find too many 10 year old lawyers - but you can find plenty of ten year old 
programmers! 
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Basics of BASIC 


Virtually all home computers provide a language known as BASIC, which allows 
programs to be written in the nearest thing to plain language presently available. 
BASIC no longer has any particular significance as to the degree of the sophistication 


of the languages, and many extremely complex and powerful programs are written 
using BASIC. 


However, there's no doubt that the name has attracted many newcomers for its 
promise of providing a starting place in the maze of computer program languages, 
andthis has contributed significantly to its universality. 


BASIC is a computer language that interprets a range of permitted commands, and 
then performs operations on data while the program runs. Unlike the average human 
vocabulary of 5000-8000 words (plus all the different ways verbs can be used еіс,) 
BASIC has to get by with about two hundred. Computer programs written using 
BASIC have to follow rigid rules concerning the use of these words. The syntax is 
precise, and any attempt to communicate with the computer using literal or 
colloquial expressions (ie. plain language) will result in the cold and clinical 
message: 


Syntax error 


This is not as restrictive as it first appears, since the language of BASIC (the syntax) 
is primarily designed to manipulate numbers - the numeric data. The words are 
essentially an extension of the familiar mathematical operators +/— etc., and the 
most important concept for newcomers to grasp is the fact that a computer can only 
work with numeric data. Information that is supplied to the CPU (Central Processor 
Unit) integrated circuit is only supplied in the form of numerical data. 


Number please 


If a computer is used to store the complete works of Shakespeare, there will not be a 
single letter or word to be found anywhere in the system. Every piece of information 
is first converted into a number which the computer can locate and manipulate as 
required. 


BASIC interprets the words as numbers which the computer can then manipulate 
using only addition, subtraction and features from Boolean logic that permits the 
computer to compare data and select for certain attributes - in other words, check to 
see ifone number is greater than or the same as another, or to perform a defined task 
ifone numberor another meets certain criteria. 


Through the medium of the program, the computer breaks down every task into a 
simple series of Yes/No operations. 
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If this process sounds cumbersome, then you're quite right, as you have uncovered the 
first and most important truth about computing. А computer is primarily a tool for 
performing the simplest of repetitive tasks very quickly and with absolute precision. 
Thus BASIC interprets the instructions as given in the form of the program, and 
translates them into the language that can be handled by the CPU. Only two states 
are understood by the logic of a computer - ‘yes’ or ‘по’, represented in binary notation 
as'l'and ‘0’. The representation in Boolean logic is simply ‘true’ and ‘false’ - there's no 
such thing as a ‘maybe’ or ‘perhaps’! 


The process of switching between these two distinct states is the essence of the term 
‘digital’, and is sometimes referred to as ‘toggling’. In the world of nature, most. 
processes move gradually from one completely “stable' state to another in a linear 
progression. In other words, the transition is made by following the path of a line 
between the two states - in an ideal digital environment the switch from one state to 
the next is made in no time at all -but the physics of semiconductor science dictate 
that there will be some minor delay, referred to as propagation delay - and it is the 
accumulation of many of these propagation delays that provides the reason why a 
computer has to spend some time processing the information before the answer comes 
out. 


Chapter 8 Page 8 At your leisure... 


In апу case, the computer would have to wait а finite time for опе task to һауе 
finished before it can start work on the result of that first task - sothere would need to 
be some artificial delay imposed anyway. The digital process is black or white, and 
the stages of transition via the various shades of grey have NO significance 
whatsoever. Conversely, the linear or ‘analogue’ progression IS via the shades of 
grey. 

If the ultimate answer is either 0 or 1, then there is no possibility of it being ‘nearly’ 
correct. The fact that computers can sometimes appear to make errors when handling 
numeric data is due to the limitation of the size of numbers it can process, requiring 
‘oversized’ data to be squeezed down to fit the space available , or жорга, leading 
torounding errors. e.g.999,999,999 becomes 1.000,000,000. 


In a world where the only two numbers available are 0 or 1, how then do you count 
beyond 1? 


Bits and Bytes 


We just happen to be used to understanding numbers based on the decimal system 
where the reference point is the number 10 - i.e. there are ten digits available to 
represent quantities in range from 0 to 9 (which is used in preference to the 
expression 1 to 10). The system where numbers range from 0 to 1 is the binary system, 
and the units in which the system operates are called bits - an abbreviated form of 
‘Binary digiT’. 


The relationship between bits and decimal notation is simple to understand: 


It’s conventional to declare the maximum number of binary digits being used by 
adding leading zeros to make up the number to the full number of bits: 


e.g. decimal 7 becomes: 
00111 binary 


„using 5 bit notation. 


In the binary system, the figures may be considered merely as indicators in columns 
to specify whether or not a given power of 2 is present; 1—yes, 0=no. 


2 


2х2х2 = 2(22) 
21 = 16 = 2х2х2х2 = 2(25) 
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-...80 the columns look like: 


2 2 2 2 2° 
1 9 0 1 1 
(6 + 0+ 0+ 2+ D = 19 


In order to provide a shorthand method of referring to binary digit information, the 
term ‘byte’ is used to denote 8 bits of information. The maximum number that be 
stored in a byte is then (binary) 11111111 - or (decimal) 255. This implies 256 actual 
variations, including 00000000, which is still perfectly valid data to a computer. 


Computers tend to manipulate data in 8 bit multiples. 256 is not a very large number, 
80 in order to achieve an acceptable means of handling the memory, two bytes are 
used to provide a method of addressing memory which is in the form of array, with a 
horizontal and vertical address by which the elements of that array can be located: 


The array can locate up to (10x10) items of information using address numbers that 
lie in the range 0 to 9. The item stored at position 3,5 isa '1' - as isthe item at5,5. 


So a binary array of 256x256 can handle 65,536 individual locations using 8 bit 
addresses for the vertical and horizontal axes of the array. So our ‘0’ and ‘1’ have 
progressed to being capable of identifying one of 65,536 different elements. 


Chapter 8 Page 10 At your leisure... 


The next level of shorthand for binary is the kilobyte (kByte or simply ‘K’) which is 
1024 bytes. 1024 is the nearest binary multiple to the more familiar decimal use of 
the term ‘kilo’ (1000) - and explains why a computer described as having a ‘64K’ 
memory does in fact have a memory of 65,536 bytes (64 x 1024). 


Thankfully, the BASIC interpreter does all the necessary conversions for you, and it 
is quite possible to become a proficient programmer without a complete 
understanding of binary, although an appreciation of the significance of binary will 
help you spot the many ‘magic’ or significant numbers that inevitably crop up as you 
work through the science of computing. 


It’s worth spending some effort to acquire an understanding of binary and the various 
significant numbers 255, 1024 etc, since it is very unlikely that these will change 
from being the bedrock of computer operation in the foreseeable future. The certainty 
and simplicity that comes from working in only two states will prevail over the 
enormously increased complexity that would result from any other number base, 


However... 


Simple and elegant as it is, binary notation is longwinded and prone to inaccuracy as 
it cannot be easily read at a glance. Binary has a number of associated counting 
systems that act as shorthand for programmers. One such number system widely 
used in microcomputing is called HEX (an abbreviation of hexadecimal). 


Here the number is based on 16 (0 to 15), and is represented in a single character: 


Decimal 


0123456789 10 11 12 13 1 15 


0123456789 A B CD EF 


The hexadecimal system can break the eight bits of a byte into two blocks of four bits, 
since 15 is a four bit number: 1111 binary. The first block indicates the number of 
complete units 04157, and the second indicates the ‘remainder’ - and this is where the 
absolute elegance of binary and hex begin to emerge. 
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Reconsidering the table that introduced binary notation: 


Decimal Binary Hexadecimal 
0 0 0 
1 1 1 
2 10 2 
3 11 3 
4 100 4 
5 101 5 
6 110 6 
7 111 7 
8 1000 8 
9 1001 9 
10 1010 A 
11 1011 B 
12 1100 с 
13 1101 D 
14 1110 E 
15 1111 Е 
16 10000 10 


An 8-bit number 11010110 (&D6 hex) can be subdivided, and then considered ав two 
4-bit numbers (known as nibbles). Throughout this manual, a hex based number is 
introduced by the '&' symbol e.g. &D6, and this is the number base most commonly 
used by programmers using assembly language techniques. An assembly language 
program is the nearest most programmers get to programming directly in machine 
code, since the assembly language program allows the program to use simple letter 
‘mnemonics’ to specify the actual machine code ‘numbers’. 


When using hex, you must first work out the value of the first digit to obtain the 
number of 16's in the final number, and then add the remainder designated by the 
second “half' of the hex notation to obtain the total decimal equivalent. There's a 
powerful temptation to regard a number like &D6 as 13-6, or 136, but it's 
(13x16) (6) = 214. 


It's the same process you use when you read a decimal number (also known as a 
Denary number) such as ‘89’ - i.e. (8x10) +(9). It just happens that multiplying by ten 
isa great deal simpler, unless you've had a lot of practice at multiplying by 16. 
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If you've got this far without becoming too confused, then you are well on your way to 
getting a grasp of the basic principles of the computer. You may even be wondering 
what all the fuss is about - and you'd be quite correct. A computer is a device that 
manages very simple concepts and ideas; it just happens to perform these tasks at 
great speed (millions of times per second), and with a huge capacity to remember both 
the data that has been input, and the intermediate results of the many thousands of 
very simplesums along the way to the result. 


If you want to pursue the theory of your computer, there are literally thousands of 
books available on the subject of computing. Some will tend to leave you more 
confused than you were when you started reading them, but a few will actually lead 
you along the way by revealing the simplicity and the fundamental relationships 
that exist between the number systems, and the way that your computer deals with 
them. 


At your leisure... Chapter 8 Page 13 


Part 2: More about the СРС664 
specifically.... 


This section gently expands upon some of the machine-specific 
aspects of the CPC664. Background information to these matters 
will be found both in the Foundation course, and in the chapter 
entitled ‘Complete list of AMSTRAD CPC664 BASIC keywords’. 


Subjects covered in this section: 


Ж Character set 
* ASCII 

* Variables 

* Logic 

Ж User defined characters 
* Print formatting 

* Windows 

* Interrupts 


* Graphics 
* Machine hardware 


Abit of character... 


As you type at your CPC664 keyboard, you should not take for granted the fact that 
recognisable letters and numbers etc, appear on the screen. After all, we've already 
discussed the fact that your computer is not a typewriter. What's actually happening 
is a result of you pressing a combination of electrical switches. The electrical signals 
produced when you press these switches are translated by the circuitry inside the 
equipment to produce a pattern of dots on the screen. We recognise that pattern of 
dots as a letter, number, or other character from the CPC664's ‘character set’. 
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Some of the characters that you will see аге not directly accessible by pressing the 
keys on the keyboard, but are only available for display using the PRINT 
CHR$ (.number;) statement. This is because each element stored in the computer is 
stored in the unit of data known as the ‘byte’ - and as just discussed іп part 1 of this 
Chapter, a byte has 256 different possible combinations of value. As the computer has 
to use at least one whole byte per character stored (whether we want it to or not - it's 
the smallest denomination that the CPC664 appreciates), we might as well use all 
256 possible combinations, rather than simply be satisfied with the 96 or so ‘standard 
characters' that are printed on most typewriters - and throw away the spare 160 
possibilities. 

The ‘standard’ range of characters is known as a ‘subset’. It is classified throughout 
the computer world as the 'ASCIT display system, a term derived from “American 
Standard Code for Information Interchange’. It’s primarily а system that ensures the 
data sent from one computer to another is in a recognisable form. The chapter 
entitled ‘For your reference...’ lists the ASCII display range, together with the 
additional characters available on the CPC664, and the corresponding numeric 
codes. 


How we get there.... 


You are by now probably quite familiar with the program: 


10 FOR n=32 TO 255 
20 PRINT CHR$(n); 
36 NEXT 


Which makes the computer display the character set on the screen. Let's now 
examine the essence of this small program: 


The first point to notice is that the computer has not been instructed to PRINT 
"abcdefghi jkUmn..... etc"; instead it has been asked to PRINT CHR$(n).n 
just happens to be a convenient shorthand note for a ‘variable’. A variable is an item 
of computer information that ‘varies’ according to the instructions given in the 
program. (The choice of the letter n for the variable is arbitrary - it can be any 
letter(s) as long asit's not a keyword.) 


How can you tell what is a variable?.... 


A number like 5 is fixed, it occurs between the numbers 4 and 6 - thus it is not a 
variable. The character n is also fixed - it’s a letter from the alphabet. 
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So how did the computer know the difference? If the letter n had been declared to be 
the alphabetical character, we would have typed n in quotation marks, i.e. "п", and 
the computer would have responded with the message Syntax error -because 
it does not understand the command sequence FOR “n"=32 TO 255. 


Simply by using n without quotation marks, we have told the computer that n isa 
variable. The definition of the FOR statement in BASIC requires that it should be 
followed by a variable - so the computer assumes that whatever follows F OR is just 
that. 


We have also told the computer that n=32 TO 255. Thus we have declared the 
range of the variable. It is in effect, a sequence starting at 32, finishing at 255. 


Having declared this variable, we should then instruct the computer what it should 
do with it - line 20 does just that: 


20 PRINT СНА$ (п); 


This specifies that whatever the current numeric value of n, the computer should 
look into its memory to see which character number corresponds to that value, and 
print the character on the screen. 


The semicolon at the end of the line instructs the computer to prevent a carriage 
return and line feed. (Otherwise each new character will be printed in the first 
column ofa new line.) 


Line 30 tells the computer that after it has performed the task with the first value of 
nin the sequence (which is 32), it should return to the line where the F OR is located, 
and do the same again with the NEXT value that it assigns to the variable n. This 
process is known as ‘looping’, and is one of the most vital and fundamental aspects of 
computer programming and operation. It saves typing long repetitious sequences 
manually, and you will quickly come to use it in your own programming. 


When this FOR NEXT loop reaches the limit of its declared range (255), the 
operation ceases and the computer then looks for the next line after line 3@ - but 
there isn’t one, so it simply ends, and returns to direct mode, displaying the Ready 
prompt. This tells you that the computer is ready to accept further instructions - or 
you can enter RUN again and repeat the execution of the program. The program is 
safely stored away in the memory and will remain there until you tell the computer 
otherwise - or turn the power off. 


This program neatly illustrates a fundamental point about computing - і.е. 
everything the computer does is related to numbers. The computer has displayed the 
alphabet - and a whole range of other characters - using a number as its reference to 
the character required. When you type the key marked A, you don't ask the computer 
totypean A onthescreen, but you tell the computer to look into the part of its memory 
that contains the numeric information to display the letter A on the screen. The 
actual location of this data is defined by the numeric code that is activated by the 
action of typing at the keyboard. 
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(Each character has а corresponding number, and these аге listed іп part 3 of the 
chapter entitled For your reference...) 


Similarly the displayed character has nothing to do with ‘writing’ the letter on the 
screen; once again it’s all about numbers. 


For example, the ASCII code for the letter A is 97. The computer doesn’t understand 
97 either (awkward blighter, eh?), and this number has to be translated from the 
human decimal code into a code that computer can relate to - it's generally referred to 
as ‘machine code’, and the principles underlying this aspect of the machine are 
discussed earlier in this chapter. 


At first, the translation from the decimal number notation we are used to in everyday 
life, to the ‘hexadecimal’ notation of the computer will seem heavy going. Thinking of 
numbers that are based on the ten unit is so natural, that to do otherwise is like 
trying to eat with your knife and fork in the opposite hands. 


A degree of mental dexterity must be acquired to understand hex notation, but once 
you do, many things about computing will fall into place and the elegant structure of 
the numbering system will become apparent. 


If you are unsure about the binary and hexadecimal numbering systems, we suggest 
that you thoroughly read part 1 of this chapter (if you have not already done во). 


Once the computer has translated the pressing of the A key into the type of number it 
understands, it looks into that part of the memory indicated, and the result is another 
series of numbers that define the character. Hence the character that you see 
displayed on your screen, is built up from a block of data, stored in the memory asa 
numeric ‘matrix’: 


ABLANK CHARACTER 
MATRIX (GRID) LOWER САЗЕа UPPER CASEA 


The elements of the matrix are rows and columns of dots. The character is displayed 
by turning the required sequence of dots on or off - each dot is determined by data 
stored in the computer’s memory. There are 8 rows and 8 columns in each character 
matrix or ‘cell’ on the CPC664 display, and if you don’t find a character you want out 
of the set of 255 that are provided, then you can re-define your own characters using 
the keyword S YMBO L described later in this section. 
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These ‘user defined characters’ сап be made up using any combination of 0 to 64 dots, 
arranged in any order - so the 'complete' character set that uses all possible 
combinations of this matrix would comprise many more different characters. Add to 
this the fact that you can group blocks of characters together to form larger block 
characters, and the possibilities for user-defined graphics are limited only by your 
timeand ingenuity. 


Logic.... 


А major difference between a calculator and computer is the computer's ability to 
handle logical operations in applications like the conditional IF THEN sequence. 
To do this, the logical operators treat the values to which they are applied as bit 
patterns (bit-wise), and operate on the individual bits. The description and use is 
entirely, well ....er logical - but it is notoriously difficult to describe logic in simple 
terms without the precision of concise definitions. 


The two halves of the logical expression are known as the arguments. A logical 
expression comprises: 


«argument /[.logical operator-«argument] 
where: 


«argument | is: NOT «argument: 
or: numeric expression: 
or: relational expression» 
or: (logical expression.) 


Both the arguments for a logical operator are forced to integer representation, and 
ER Ror 6 results ifan argument will not fit into the integer range. 


‘The logical operators, in order of precedence, and their effect on each bit are : 

AND ResultisO unless both argument bits are 1 

OR Resultis 1 unless both argument bits are 0 

XOR Resultis 1 unless both argument bits arethe same 

AND is the most commonly employed logical operator, and does NOT mean ‘add’. 
PRINT 10 AND 10 

Results in 10 
PRINT 10 AND 12 


Results in 8. 
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PRINT 10 AND 1000 
Resultsin 8 again. 


This is because the numbers 10 and 1000 have been converted to their binary 
representations: 


1010 
1111101000 


The AND operation checks each corresponding bit at a time, and where the bit in the 
top AND the bottom row is the 1, the answer is 1: 


0000001000 


..Which is our result of 8. The logical operator AND is used to detect when two 
conditions are present simultaneously. Here's a self explanatory application: 


10 INPUT "The number of the day ay 

20 INPUT "The number of the month";month 
30 IF day=25 AND month=12 THEN 50 

48 CLS:GOTO 18 

50 PRINT "Merry Christmas!" 


0R works on bits as well, where the result is 1 unless both bits from the arguments 
are Ø, in which case the result is Ø. Using the same numbers as for the AND example: 


PRINT 1000 OR 18 
1002 


Bit-wise: 
1010 
1111101000 
Resulting in the answer: 
1111101010 
Andina program example: 


18 CLS 

20 INPUT "The number of the month";month 

30 IF month-12 OR month-1 OR month=2 THEN 50 
4B GOTO 18 

50 PRINT "It must be winter!" 
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— 


The NOT operator inverts each bit in the argument (0 becomes 1, and vice versa): 


10 CLS 

20 INPUT "The number of the month";month 

38 IF NOT(month=6 OR month=7 OR month=8) THEN 50 
48 GOTO 10 

50 PRINT "It can't be summer!" 


Another major feature to consider is the fact that you can add together any number of 
logical conditions (up to the maximum line length) to distill the facts yet further. 


10 INPUT "The number of the day";day 

20 INPUT "The number of the month";month 

30 IF NOT(month=12 OR month=1) AND day=29 THEN 50 

40 CLS:GOTO 18 

50 PRINT "This is neither December nor January, but 
this might be a leap year" 


The result of a relational expression is either - 1 or Ø. The bit representation for - 1 
is all bits of the integer = 1; for В all bits of the integer = Ø. The result of a logical 
operation оп two such arguments will yield either - 1 for True, or Ø for False. 


Check this by adding lines 60 and to the above program: 


60 PRINT NOT(month=12 OR month=1) 
78 PRINT (month=12 OR month=1) 


...and when the program is run, entering 29 for the day and, say, 2 for the month 
will produce the answer in line 50, and the actual values returned by the logical 
expressions in lines 60 and 70. 


Finally, XOR (eXclusive OR) produces a true result as long as both arguments are 
different. 


The following summarises all these features in what's known as а ‘truth table’. It's a 
convenient way of illustrating what happens їп а bit-wise logical operation. 


ArgumentA 1010 
ArgumentB 0110 


ANDresult 0010 
OR result 1110 
XORresult 1100 
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User defined characters 


One ofthe first applications of binary numbers that you are likely to come across will 
be when designing characters for use with the SYMBOL command. If the character is 
drawn on an 8 by 8 grid then each of the eight rows can be converted to a binary 
number by putting a 1 for each pixel that is to be inked and a zero for each that should 
be invisible, i.e. set to the paper colour. These eight numbers are then passed to the 
SYMBOL command. For example, to define a house character: 


* = 00001000 = &08 = 8 
жаа» = 00111109 &3C 324165844 
* * = 01000018 542 64 1x2 
жж * * = 10100101 &AS 128 *32 +4 +1 
* * = 10000001 881 128 +1 
ж жж ж ж = 10110101 &B5 128 +32+16 +4 +1 
* ** ж = 10110001 %в1 128 +32+16 +1 
жжжжиких = 11111111 = &FF = 128+64+352+16+8+4+2+1 
..the command is: 


SYMBOL 240,8,60,66,165,129,181,177,255 
n 

SYMBOL 240,808,83C,842,8A5,881,885,&B1,BFF 
po eens 


SYMBOL 240,8Х00001000, &x00111100, 8Х01000010, 8Х10100101, 
&x10000001, 8Х10110101, 8Х10110001, &X11111111 


To print the user defined character, you would type: 
PRINT CHR$(240) 
Finally,to group blocks of characters together, you may for example specify: 


semi$-CHR$(240) *CHR$C240) 
PRINT semi$ 


ma ог... 


{еггасе$ =$181№6$ (15,248) 
PRINT terrace$ 


Printing press, 


PRINT is one of the first ever commands that you use when you start to learn 
computing. It’s one of those BASIC commands that does what it says really.... or does 
it? In fact there's a lot more to PRINT than at first it seems, for instance WHERE 
should it print? and HOW should it print?.... 
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Print formatting 


Тһе PRINT command has several ways in which it can be used. The simplest is (о 
follow it by an item to be printed. This item can be a number, а string or a variable 
name, 


PRINT 3 
3 


PRINT “hello” 
hello 


а=5 
PRINT а 
5 


a$z"test" 
PRINT a$ 
test 


Several items may be placed in one PRINT statement with each being separated by 
а separator, or TAB or SPC. The possible separators are either a semicolon or a 
сотта, The semicolon causes direct continuation of printing, while a comma forces 
printing to continue in the next zone. The initial zone width is 13, but may bechanged 
usingthe ZONE command. 


PRINT 3;-4;5 
3-4 5 


PRINT "hello ";"there" 
hello there 


PRINT "hello","there" 


hello there 

PRINT 3,-4,5 

3 -4 5 
ZONE 4 
PRINT 3,-4,5 

3 -4 5 


A point to note here is the fact that positive numbers аге printed with a leading space, 
while negative numbers have a leading minus sign. АП numbers have a trailing 
space. Strings are printed exactly how they appear between the quotes. 
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The function S Р С takes a numeric expression as a parameter, and will print ав many 
spaces as are specified by the expression. If the value is negative then zero is 
assumed, if it is greater than the current stream (window) width, then the stream 
width is assumed. 


PRINT SPC(5)"hi” 
hi 


x=3 
PRINT SPC(x*3)"hi" 
hi 


TAB is very similar except that it will print as many spaces as are needed so that the 
item to be printed will appear in the specified column. 


The stream in which all printed output will appear is window 0 unless a stream 
director (#) is included before the list of items to be printed. Other streams may be 
used to output to the other windows. Streams 8 and 9 are special cases - anything 
printed on stream 8 will appear on the printer (if connected). Stream 9 directs output 
to a disc (or cassette) file. Note however, that the WRITE command should be used 
instead of PR INT for this purpose. 


PRINT "hello" 
hello - window 0 


PRINT #8,"hello" 


hello - also window 0 
PRINT #4,"hello” 
hello - window 4 
(At the top of the screen) 
PRINT 48,"hello" 
hello - onthe printer 
(Ifconnected) 


TAB and SPC are fine for simple print formats, but to specify a more detailed format, 
the PRINT USING command, together with a suitable format template can be 
used. A format template consists of a string expression containing special characters, 
each of which will specify a particular type of format. These characters, called 
‘Format field specifiers’, are detailed in the description of the keyword 
PRINT USING, earlier in this manual. Some of the following examples however, 
may make their use а little clearer. 


Firstly, here are the formats available for the printing of strings: 
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941 V" will print as many characters from a given string, as there are spaces + 
backslashes in the template. 


PRINT USING "N \";"test string" 
test s 


can be used to print the first character ofa string. 


PRINT USING "! 
t 


test string" 


++. But probably the most useful string format is " & ". This can be used to override the 
string wrapping feature of BASIC if required. By default, BASIC will start the 
printing of any string on a new line if it is too long to fit onto the current line. PRINT 
USING "&"; canbeusedtooverridethis. 


(Use BORDER 0, sothat you can see the edges of the paper.) 
MODE 1:10САТЕ 39,1:PRINT "too Long" 


- line 1 

too Long - line 2 
MODE 1:LOCATE 39,1:PRINT USING " too long" 

to - line 1 

o (опа - line 2 


A large number of templates are available for the printing of numbers. Probably the 
simplest is PRINT USING "#####", one digit is printed for each "#" that 
appears in the template. 


PRINT USING "######"; 123 
123 


The position of the decimal point may be included by the use of" . '" 


PRINT USING “HHH. ##HHH" 712.45 
12.45000 


The digits before the decimal point may be grouped into threes, separated by commas 
if" ," isincluded in the template before the decimal point. 


PRINT USING "##HHHEHH, ВЕНЕ"; 123456.78 
123,456.7808 
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Floating dollar and pound signs may be included in the format - i.e. a currency sign 
that will always be printed directly before the first digit of the number, even if it does 
not fill the complete format. This is achieved by the use of "$$" and " ££" in the 
template. 


PRINT USING "$$544";7 
57 


PRINT USING "$$##";351 
$351 


PRINT USING "££####,.#8"31234.567 
£1,234.57 


Note the rounding ofthe result. 


The space before the result may be padded with floating asterisks by the use of "ж" 
inthetemplate. 


PRINT USING "**4444.4"7:;12.22 
****12.2 


This may be combined with the currency symbols, (and then only one currency 
symbol is used) - i.e. "жж. etc" or "**£... 


А "+" at the start of the template specifies to always print the sign of the result 
before the first digit. A "+" at the end of the template prints a trailing sign. 


А " -"' can only be placed at the end of the format, and specifies that a trailing minus 
sign be printed ifthe number is negative. 


PRINT USING "+##";12 
+12 


PRINT USING "+##";-12 
“12 


PRINT USING "##+";12 
12% 


PRINT USING 
12- 


PRINT USING "йй-";12 
12 
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А "ТТ Т Т" formattemplate сап be used to print a number in exponential format. 


PRINT USING "###.#81111";123.45 
12.35Е%01 


When using print formats for numbers, note that if a number is too long for (һе 
specified template, then a Z symbol is printed before the result,-to indicate that this 
hashappened, and the result is NOT shortened to fit the specified template. 


PRINT USING "####"; 123456 
4123456 


Want your windows done? 


The BASIC of the CPC664 provides a comprehensive method for setting up a 
maximum of eight text windows. Any of the text screen driving commands may then 
be directed to any oneofthese windows. mo 7 > 


The command that is used to set up a window is, simply enough: WINDOW. This is 
followed by 5 values. The first is optional and is used to specify which window is to be 
defined - if omitted, then window zero is assumed, all the normal BASIC prompts and 
messages (for example, ‘Re ad у”) are produced in window zero. The hash symbol (#) 
precedes this number to identify it as being a stream director. The next four numbers 
specify the left, right, top and bottom limits of the window. These values are column 
and row numbers, so they must lie in the range 1 to 80 for left/right and 1 to 25 for 
top/bottom. 


The following example will define WINDOW (stream) number 4 to start in column 7 
(left) and go on to column 31 (right), and to start at row 6 (top) and go down to line 18 
(bottom). Reset the computer then type : 


WINDOW #4,7,31,6,18 


Nothing will appear to have happened after this command, however, try typing the 
following: 


INK 3,9 
PAPER #4,3 
CLS #4 


This will cause a large green rectangle to appear on the screen, and this is window 
number 4. The above also shows that PAPER and CLS may be used with any one of 
the eight windows by the inclusion of a stream director; its omission causes the 
command to operate on window 0 - the default window. 
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Each of the following commands may include а stream director to identify the 
WINDOW in which the command isto be carried out. 


CLS 
COPYCHRS 
INPUT 
LINE INPUT 
LIST 
LOCATE 
PAPER 
PEN 

Р05 
PRINT 
TAG 
TAGOFF 
veos 
WINDOW 
WRITE 


The new green window which you have put on the screen, will have obscured some of 
the previous text (written on window number 0). 


‘Text may be directed to any window by including a stream director in a PRINT 
statement: 


PRINT /4,"hello there" 


These words will appear at the top of the green rectangle, rather than on the 
following line as would have happened if.... 


PRINT “heilo there" 


...had been used. While typing in the earlier command, you will have noticed that 
part of the green window was overwritten by the text. 


If you want all the normal BASIC messages to appear in window 4, then it can be 
swapped with the default window (8) by use of the WINDOW SWAP command: 


WINDOW SWAP @,4 


The ‘Ready’ that follows this command will be printed in the green window. The 
cursor will be positioned directly beneath it. Now try typing the following: 


PRINT #4,"hello there" 
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апа the words ‘hello there’ will appear directly beneath the WINDOW SWAP 
command in the old window B, which is now window 4. It may also be apparent from 
this, that the current print position in each window is stored, so that even after а 
WINDOW SWAP, text is printed part way down the new stream 4 rather than 
starting at the top. Try the following: 


LOCATE #4,20,1 
PRINT "this is window 8" 
PRINT #4,"this is window 4" 


The ‘window 0” message will appear on the line after the PRINT, while the 
‘window 4' message will appear at the middle of the top line of the whole screen. 


Before a WINDOW command has been issued, all eight windows cover the entire 
screen. This is also true after a MODE command has been issued - so, if after using 
windows you find that the cursor ends up in a very small window, just type in 
MODE 1, asshown: 


MODE 1 
WINDOW 20,21,7,18 
мо 
DE 
1 


Don't worry about the word ‘MOD E’ being split up - it will still work, and don't forget 
toleaveaspace between MODE and 1. 


Now that you know a little about the way in which windows operate -try typing in the 
following short program : 


18 MODE 0 

20 FOR n=0 TO 7 

30 WINDOW /n,n*!,n*ó,n*1,n*6 
40 PAPER Hn nt 

50 CLS #n 

68 FOR c=1 TO 200:МЕХТ c 

70 NEXT п 


Тһів sets up 8 overlapping windows and clears each to а different paper colour. When 
the program has finished running and 'R e ad y' appears, try pressing [ENTER] a few 
times to see how the scrolling of window 0 affects the coloured blocks on the screen. 
However, although these coloured blocks may be scrolling, the locations of the other 
windows do not actually move. Try the following: 


CLS #4 
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гапа you will see that the 4th window is still іп the same position - the new coloured 
block having obscured those beneath it as one would expect. As a matter of interest, 
observethe differences when you type: 


LIST 
LIST #4 
LIST #3 


А further feature of the WINDOW command, demonstrated by the final program in 
this section, is that it does not matter if you specify the left and right window 
dimensions in reverse order. This means that if the value of the first parameter is 
greater than the second, BASIC will automatically sort the dimensions into the 
correct order. This also applies to the top and bottom window dimensions. 


=1+RND*19 
1*RND*24 


40 e-RND*15 

50 WINDOW a,b,c,d 
60 PAPER e:CLS 

70 GOTO 28 


If I may interrupt... 


Ifyou haven't already noticed, a major innovation in the software ofthe CPC664 is its 
unique ability to handle interrupts from BASIC - which means that AMSTRAD 
BASIC is capable of performing a number of simultaneous but separate operations 
within a program. Such a facility is sometimes referred to as ‘multi-tasking’, and it is 
implemented by the application of the commands A F T ER and EVERY. 


This facility is also clearly demonstrated in the way in which sound may be handled 
through facilities such as queues and rendezvous. 


Every aspect of timing is referred to the master system clock, which is a quartz 
controlled timing system within the computer that looks after the timing and 
synchronisation of events that happen in the computer - things like the scanning of 
the display and clocking the processor. Where a function in the hardware is related to 
time, this can be traced back to the quartz master clock. 


The software implementation is the À F TER and EVERY command, which in keeping 
with the user-friendly approach of AMSTRAD BASIC, do precisely what they say; i.e. 
AFTER the time that you have preset in the command, the program will divert to the 
designated sub-routine and perform the task defined therein. 
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The CPC664 maintains a real time clock. The AFTER command allows а BASIC 
program to arrange for sub-routines to be called at some time in the future. Four 
delay timers are available, each of which may have а sub-routine associated with it. 


When the time specified has passed, the sub-routine is called automatically, just as if 
a GOSUB had been issued at the current position in the program. When the 
sub-routine finishes, using a normal RETURN command, the main program 
continues running where it was interrupted. 


The EVERY command allows a BASIC program to arrange for sub-routines to be 
repeatedly called at regular intervals. Once again, four delay timers are available, 
and each may have a sub-routine associated with it. 


The timers have different interrupt priorities. Timer 3 has the highest priority and 
timer 0 the lowest (see the chapter entitled ‘For your reference....’). 


10 MODE 1:n=14:x=RND*400 

20 AFTER x,3:GOSUB 80 

3@ EVERY 25,2 GOSUB 160 

40 EVERY 10,1 GOSUB 170 

50 PRINT "test your reflexes” 
60 PRINT "press the space bar."; 
70 IF flag-1 THEN END ELSE 70 
80 z-REMAIN(2) 

90 IF ІМКЕҮ(47)--1 THEN 110 
100 SOUND 1,900:PRINT "cheat! 
1180 SOUND 129,20:PRINT "NOW 
120 IF INKEY(47)=-1 THEN 120 
130 PRINT "you took"; 

140 PRINT (TIME-t)/300;"seconds" 
150 CLEAR INPUT:flag- 
160 SOUND 1,0,50:PRINT 
170 nzn*1:1F n»26 THEN n=14 
180 INK 1,n:RETURN 


AFTER and EVERY commands may be issued at any time, resetting the sub-routine 
and time associated with the given delay timer. The delay timers are shared by the 
AFTER and EVERY commands, so an AF TER overrides any previous E VERY forthe 
given timer, and vice versa. 


The D I and E I commands disable and enable timer interrupts whilst the commands 
between them are executed. This has the effect of delaying a higher priority interrupt 
from ever occurring during the processing of a lower priority interrupt. The REMAIN 
function disables, and returns the remaining count for one ofthe four delay timers. 
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Using data.... 


Inaprogram that always requires the same set of information to be input at the start, 
it would make more sense if there were some way of entering all the values without 
having to ask the user to type them in every time. This facility is provided by the 
READ and DATA commands. The word READ is very si rto INPUT inthatitcan 
be used to assign values to variables. It differs, however, in the fact that values are 
read from DATA statements, rather than prompting for input from the keyboard. The 
following two examples show this: 


10 INPUT "enter 3 numbers separated by commas";a,b,c 
20 PRINT "the numbers are";a;"and";b;"and";c 
run 


18 READ a,b,c 
20 PRINT "the numbers are";a;"and";b;"and";c 
30 DATA 12,14,21 

run 


In the same way that different items in an INPUT statement are separated by 
commas, so it is with items ina DATA statement. 


In addition to numeric values, constant strings may also be held in DATA statements: 


10 DIM a$(8) 
20 FOR ізй TO 8 

30 READ а$(1) 

40 NEXT 

50 FOR 1=0 TO 8 

60 PRINT a$(i);" "; 

70 NEXT 

80 DATA The,quick,brown,fox, jumps over ,the,lazy,dog 


You may notice that although the DATA contains strings, the strings are not 
enclosed by double quotes "". The use of double quotes in DATA statements to 
delimit (separate) strings is optional, just as they are when typing a string in answer 
toan INPUT statement. One occasion that double quotes are useful however, is when 
thestring DATA itselfcontains commas. If strings are not delimited by double quotes 
under these circumstances, the READ statement will use the commas to delimit the 
strings in the DATA statement. 
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10 READ a$ 

20 WHILE a$<>"*" 

30 PRINT a$ 

40 READ a$ 

50 WEND 

60 DATA The old, desolate, battered house creaked in 
the wind 

70 DATA "The tall, slim, dark man coughed loudly." 

80 DATA * 


Тһе string іп line 60 contains commas, so each part will Бе READ and printed 
separately. The string in line 70 however, is delimited by double quotes and will be 
printed as a whole, as intended. ^ 


The above example illustrates the fact that data can be spread over a number of lines. 
READ will work down the lines in number order (68, 70, 80, etc.). Another fact that 
may not be obvious is that DATA statements can be placed anywhere within a 
program; before or after the READ statement that picks up the information. 


If a program contains more than one READ statement, then the second READ will 
continue from the point at which the first RE AD stops: 


18 DATA 123, 456, 789, 321, 654, 2343 

20 FOR 1=1 to 5 

30 READ num 

40 total-total*num 

50 NEXT 

60 READ total2 

70 IF total-total2 THEN PRINT "the data is ok" 
ELSE PRINT "there is an error in the data" 


Try editing line 10 sothat one ofthe first 5 numbers is wrong, then run the program 
again. This technique of adding an extra value to the end of DATA statements which 
is the sum of all the other values, is a good method of detecting errors in DATA, 
especially if there are a large number of DAT A lines- this is known as a ‘checksum’, 


Ifa program requires mixed data (strings and numbers), it is permissible to combine 
string and numeric items in READ and DATA statements, as long as the items are 
read correctly. For instance, if the DATA contained sequences of two numbers 
followed by a string - then it would only make sense to use a READ that was followed 
by two numeric variables, then a string variable: 
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18 DIM a(5),b(5),s$(5) 

20 FOR 1=1 TO 5 

ЗВ READ а(1),5(1),55(1) 

46 NEXT 

50 DATA 1,7,fred,3,9,jim,2,2,eric,4,6,peter,9,1,alfonzo 
68 FOR 1=1 TO 5 
70 PRINT 5551), 
80 NEXT 


aCi)*bCi) 


10 DIM a(5),b(5),s$(5) 
. 20 FOR із1 TO 5 
30 READ a(i),b(i) 
40 NEXT 
50 FOR 1=1 TO 5 
68 READ s$(i) 
70 NEXT 
8@ DATA 1,7,3,9,2,2,5,6,9,1 
9@ DATA fred,jim,eric,peter,alfonzo 
100 FOR 1=1 TO 5 
110 PRINT s$(i),":";a(i)*b(i) 
120 NEXT 


Ifthe FOR loopin line 20 is now changed to: 
20 FOR 1=1 TO 4 


...then the first two attempts to read strings in line 60 will produce ‘9’ then ‘1’. These 
values are of course valid strings, but the result is not exactly what was planned! One 
method by which the program could be forced to work properly, would be to include 
the following commands: 


15 RESTORE 80 
45 RESTORE 90 


The RESTORE statement will move the DAT A-reading ‘pointer’ to the line specified, 
and can therefore be used in a conditional statement to pick a certain block of data to 
beread depending upon some criterion. For instance, in a multi-level game which has 
a number of different screens, the DATA for each screen may be picked according to 
some variable - for example “L ev e U. The following isjust an example section of such 
aprogram: 
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—_—_—_—_—_——____—__ы_ 


1000 REM section to draw the screen 
1010 IF Level-1 THEN RESTORE 2010 
1020 IF level=2 THEN RESTORE 2510 
1030 IF levei-3 THEN RESTORE 3010 
1840 FOR y=1 TO 25 

1050 FOR х=1 TO 48 

1060 READ char 

1070 LOCATE х,у: PRINT CHR$(char); 
1080 NEXT x,y 

2000 REM DATA for screen 1 

2010 DATA 200,198,244,244,210 ...etc. 
2500 REM DATA for screen 2 

2510 DATA 100,105,245,243,251 

3000 REM DATA for screen 3 

3010 DATA 190,191,192,193,194 ....etc. 


Another example use of DATA, READ and RESTORE might be in a program that 
plays a tune. Tone period values may be READ from DATA statements, and 
RESTORE used to make a section repeat by moving the pointer back to the beginning 


оға сегізін 


100 
118 
120 
130 
run 


n part of ће music data: 


FOR i=1 TO 3 

RESTORE 100 

READ note 

WHILE notec»-1 

SOUND 1,note,35 

READ note 

WEND 

NEXT 

SOUND 1,142,100 

DATA 95,95,142,127,119,106 
DATA 95,95,119,95,95,119,95 
DATA 95,142,119,142,179,119 
DATA 142,142,106,119,127,-1 
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At your leisure... 


Тһе sound of music.... 


Of all the CPC664's features, the sound and envelope commands will probably seem 
to be the most daunting at first sight - this needn't be the case. With a little practice 
you should be able to make a whole range of different noises and even make the 
machine play a complete tune with harmonies. 


Let's start by having a look at the first 4 parts of a SOUND command. These аге: 
channel number, tone period, duration of note, and volume. You may be wondering 
what range each number has to be in. 


We'll leave the first part (channel number) for a moment because it is quite 
complicated. The second part (tone period) can take any whole number value from 0 
to 4095, but only some of these will actually produce recognisable notes from the 
musical scale - these are listed in part 5 of the chapter entitled For your reference....’. 
For instance the number 478 will play middle C, and 506 will play the note B below 
middle C, the values 479-505 will play a tone, but not one that corresponds to the 
piano scale. If the tone period is zero then no tone will be played - this will be useful 
when using ‘noise’ (explained later). 


The third part of the SOUND command gives the duration of the note in units of a 
hundredth of a second. The value can generally be anywhere in the range 1 to 32767. 
However, if the value is zero, then the length of the note will be determined by the 
‘envelope’ used (more of this later). Ifthe value is negative then it indicates how many 
times the envelope should be played, so -3 would mean ‘repeat the volume envelope 
three times’ (again, this will be explained later). 


Тһе fourth part of the command is the volume. This сап be from 0 to 15 (but if it is 
omitted, 12 is assumed). With the simple sounds that have been made so far, the 
volume remained constant for the whole time that the note played. When a ‘volume 
envelope’ is used to vary it, then the volume part of the SOUND command is taken as 
the starting value of the note. 


Now for the channel number part of the command. You might as well know now that 
this is a bit significant’ number - so you'll need to know a little about binary numbers 
to fully understand it (see part 1 of this chapter). 


A sound can be played on one of three possible channels, if the computer is connected 
to a stereo amplifier, then one channel will be on the left, another on the right and the 
third on both (in the middle). To choose which channel(s) that a note should be played 
on, the following numbers are used: 


1channel А 
2channelB 
4channelC 
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То play оп more than опе channel, add up the numbers бог the desired channels, For 
exampleto play on А and C use 1+4 = 5. 


SOUND 5,284 


You may be wondering why channel C is given the number 4 and not 3 as you might 
expect. This is because each of these numbers із a power of two (1-2 0, 2-21 1, 
4=2 1 2) so that they combine to form a binary number. If you think about a three 
digit binary number, then each of the three digits can be either 0 or 1, and this is used 
in the channel number to indicate whether the corresponding channel should be on or 
off. From the above example: 


5 in decimal is equivalent to 1*4 + @*2 + 1% 1 or 101 in binary. It follows then, that 
ifeach column of this binary number is labelled C, B, and A, this gives: 


СВА 
101 


Inother words, channel С is ON, B is OFF, and A is ON. Ifthe note was to be played on 
channels A and B, then this would become: 


CBA 
0 1 


And the binary number 011 is the same as @*4 + 1*2 + 1*1 = 3. So ће SOUND 
command would be: 


SOUND 3,248 


This is, of course, the same value that would be found if you just added up the 
numbers for the channels to play on (remember A=1, B=2, C=4). So to play on A and 
B, the channel number is given by 1+2 = 3. 


Ifyou didn’t understand that - don’t worry. As long as you can see that a combination 
of channels can be chosen by adding up the numbers for each of the channels to be 
used, then that’s all you really need to know. 


Unfortunately, there are yet more values that can be used in the channel number. 
The numbers 8, 16 and 32 are used to specify that the sound should ‘rendezvous’ with 
another channel (A, В, С respectively). You're probably wondering what is meant by 
the term rendezvous. Well, up to now the sounds that we have produced have gone 
straight to the specified channels. Try this: 


SOUND 1,248,2000 
SOUND 1,909,200 
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Unless you аге а very slow typist, you will have noticed that you were able to type in 
the second of these commands before the first had finished. This is because the sound 
system is able to hold up to 5 sound commands for each channel in a ‘queue’. If we 
wanted a sound to play on channel A, and then two sounds to play simultaneously on 
A and B, we would need some way of letting the computer know that the sound on В 
should not start until the second note оп А was ready to play - i.e. making one channel 
wait for another. This is known as a rendezvous, and there are two ways in which this 
can be achieved : 


SOUND 1,200,1000 
SOUND 3,980,200 


In this, the second note is directed to A and B, so it cannot start until the note on A 
finishes. The limitation with using this method (to make a note combination wait 
until all channels that it should play оп are free) is that the same sound will be 
directed to each of the channels (in this case , 90 , 208 went to both A and В). The 
alternative method isto use the following: 


SOUND 1,200,2000 

SOUND 1%16,90,200 

SOUND 2+8,140,408 
Here, the second note on А is made to rendezvous with the sound on B (and the sound 
on B is made to rendezvous with the note on A). The advantage here is clear 
- although the second note on A was different to the note оп B, the two were stil! 
linked so that neither could start until both channels were free - this is a rendezvous. 
Onceagain the values are bit-significant: 
8-213,16-214,ап432-215 


...80 now the channel number can be seen as a binary number where the columns are 
headed: 


Rendezvous Rendezvous ^ Rendezvous Playon Playon Playon 
да 32 Add16 "mr m 4 Ааа 2 Ada 1 
So for a note to play on C and rendezvous with A, you would use: 
9 0 1 1 0 0 
This is the binary number 1100, which is equal to8 + 4 = 12 


Hence, a channel number of 12 would tell the computer to play a note on channel C, 
and wait for a note that has been marked to rendezvous with it on channel A. 


At your leisure... Chapter 8 Page 37 


SS -- 


If 64 (2 1 6) із added to the channel number, then this indicates that the note should 
be held. In effect, this means that the note will not play until the command 
RELEASE isused. 


And finally, if 128 (2 1 7) is added to the number, then the queue of the channel 
specified will be cleared (or flushed). Therefore, if you start a sound that is going to 
continue for too long on a particular channel, then a quick way to stop it is to flush the 
channel: 


SOUND 1,248,30000 (this would play for 5 minutes) 
SOUND 1+128,0 (this will stop it short) 


In direct command mode, a quicker way of stopping any long sounds is to press the 
[DEL] key at the start ofa line; the short warning beep flushes all sound channels. 


Now that we can hopefully send a sound to any of the three channels that we choose, 
(with rendezvous if necessary), it would be nice to be able to produce a little more than 
the rather unmelodious ‘beep’ that the simple SOUND command produces. The way 
to do this is to play the sound with an envelope - a pattern that defines how the note 
gets louder and quieter during the short time it is playing. A note produced by an 
instrument has an initial attack, where the volume rises very sharply. The volume of 
the note then falls away to a lower level which is sustained for a time, after which it 
fades away to zero. It is possible to give an envelope of this nature to the notes 
produced by the SOUND command. The associated ENV command is used to do this. 
First let's look at a simple example: 


ЕМУ 1,5,3,4,5,-3,8 
SOUND 1,284,0,0,1 


The ENV must come before the SOUND command for which it is used. To use this 
envelope in a SOUND command, its number is included as the fifth partofthe SOUND 
command - in this case, the envelope is number 1. The first number in an ENV 
command is the number of the envelope that it defines. The EN V instruction contains 
information about how long the note will last and how loud it will get, so the duration 
and volume parts ofthe S OUND command are set to zero. The envelope defined above 
causes the sound to be increased in 5 steps, each step increasing the volume by 3, and 
each step being 4 hundredths of a second long. The volume is then to be reduced in 5 
steps, each step decreasing the volume by -3, each step being 8 hundredths of a 
second long. In other words, the first number identifies which envelope is being 
defined, and this is then followed by two groups of three numbers, and in each of these 
groups, the first number indicates by how many steps the volume is to go up or down. 
Тһе second number indicates by how much the volume is to go up or down at each of 
these steps, and the third number determines by how long each step of volume is to be 
held for. 
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Тһе totallength of time that each section will take is equal to the first value (number 
of steps) multiplied by the third value (pause time). The total increase or decrease in 
volume is equal to the number of steps multiplied by the step size. The overalllength 
of an envelope with more than one section, is equal to the sum of the lengths of each 
section. 


Of course, the starting volume needn't always be @ (as set by the SOUND command). 
The above example produced a note that went up, then back down again. The 
following will go down, then back up: 


ENV 2,5,-2,1,20,0,1,10,1,1 
SOUND 1,248,0,15,2 


This envelope is given the number 2 and has three sections. In the first, the volume is 
reduced in 5 steps of - 2. That is, it goes down by 2 at each step and there are 5 steps. 
The length of each of these steps is 1 hundredth of a second. The second section 
consists of 20 steps, but with Й (zero) reduction or increase in the volume (i.e. 
constant volume) per step. Again, the length of each of these steps is 1 hundredth ofa 
second. Finally, the third section has 18 steps, each increases the volume by 1, and 
once again each step is 1 hundredth ofa second long. 


The SOUND command has a starting volume of 15, so after the first section the 
volume will be reduced to 5, this is held constant for 20 hundredths of a second, then 
gets increased to 15 in the final section ofthe envelope. 


Itis perhaps а little difficult to visualise the shape of these envelopes. It often helps to 
draw them out on graph paper and take the values for the ENV command from this. 
The following show the shape of the two envelopes that have been defined so far: 


p CONT э STEP COATS 
Hoi Безеу 
LM Шалы 
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STEP COUNT 20 


The maximum number of sections in an envelope is 5, and each section takes 3 values, 
so the ENV command can have up to 16 parts (including the first, that identifies 
which of the 15 envelopes (1 to 15) is being created). If the steps up or down cause the 
volume to go above 15 or below 0 then the value will wrap around; so the step above 15 
is 0, and the step below 0 is 15: 


ЕМУ 3,9,5,20 
SOUND 1,248,0,0,3 


This simple envelope produces 9 steps, each step increasing the volume by 5, and 
each step lasting 20 hundredths of a second. After the first three steps therefore, the 
volume will be 15, so the next step will take it back round to 4, then 9 and so on. The 
diagram on the following page shows the effect : 
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Relative 
lume 
ange 


The range of values for the number of steps is 0 to 127. The step size can be varied 
from —128 to --127 (negative values decrease the volume), and the pause time (i.e. 
the time between steps) can be anywhere in the range 0 to 255. 


Now that we can create a volume envelope to give a characteristic shape, we may also 
want to define a characteristic tone pattern to include things such as vibrato - where 
the sound ‘wavers’ about the main tone of the note. 


This is done in a very similar way to that in which volume envelopes are defined. 
Tone envelopes are defined using the ENT command. For example: 


ENT 1,5,1,1,5,-1,1 
SOUND 1,248,10,15,,1 


A tone envelope is called into the SOUND command by entering the tone envelope’s 
number as the sixth part of the SOUND command. Again the ENT must come before 
the SOUND command. 
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This first example of ENT specifies that in tone envelope number 1, there is to be 5 
steps, each step increasing the tone period by 1, each step being 1 hundredth of a 
second. The next section of the envelope again specifies 5 steps, this time each step 
decreasing the tone period by - 1, again each step being 1 hundredth of a second. This 
is a total length of 5 + 5 = 10. Notice that this length was specified in the SOUND 
command because a tone envelope does NOT determine the length of time that a note 
will play (in the same way that a volume envelope does). If the length used in the 
SOUND command is shorter than the length of the tone envelope, then the last part of 
the tone envelope will be lost. If it is greater, then the last part of the note will play 
with a constant tone. This also applies if a volume envelope is used to determine the 
note length. 


(Notice the absence of any number in the volume envelope part of the SOUND 
command- this is because we have not created a volume envelope for this sound.) 


The majority of tone envelopes will probably be much shorter than the expected 
length of the note. For this reason, a tone envelope can be made to repeat throughout. 
the time that the note is playing. This is done by specifying a negative envelope 
number, the positive equivalent of which must be used in the SOUND command: 


ENT -5,4,1,1,4,-1,1 
SOUND 1,248,100,12,,5 


This will produce a vibrato effect on the note. When defining tone envelopes, it is 
usually best if they can be made to vary symmetrically about the initial tone period, 
so that when the note repeats, it will not go further and further off the initial 
frequency (pitch)- try this: 


ENT -6,3,1,1 
SOUND 1,248,90,12,,6 


You will notice that this tone will fall in frequency quite dramatically because each 
time the envelope is repeated, the tone period will increase by 3 and this will happen 
30 times (99 / 3). This sort of effect can be quite useful for ‘warbling’ notes and sirens: 


ENT -7,20,1,1,20,-1,1 
SOUND 1,100,400,12,,7 


ENT -8,60,-1,1,60,1,1 
SOUND 1,100,480,12,,8 


The number of possible tone envelopes is 15 (in the range 1 to 15), with a negative 
value indicating that the envelope should repeat. The number of steps (the first value 
in each group of three), can be anywhere between 0 and 239. As in the volume 
envelope, the step size can be from -128 to 127, and the pause time should be between 
0 and 255. Once again, an ENT command, like an ENV command, сап have a 
maximum of five sections (each containing 3 values). 
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The final part that сап be added onto а SOUND command is a seventh value that 
indicates the level of noise which should be included in the sound. One point that 
should be borne in mind when including noise in a sound, is the fact that there is only 
one noise channel, so each subsequent noise period value overrides any previous one. 


The noise can be added to a tone to give it a different sound, or can be used quite 
separately, by setting the tone period (second part) of the SOUND command to В, so 
that only noise is present. This is of use in making percussive type sounds. Try this 


ENT -5,2,1,1,2,-1,1 
ЕМУ 9,15,1,1,15,-1,1 
FOR а-1 TO 10: SOUND 1,4000,0,0,9,3,15: NEXT 


This could form the basis of a train noise. You will notice that this combines both 
types ofenvelopes and noise. 


The duration and volume parts of the SOUND command are both set to 0 as they are 
determined by the volume envelope. 


Now that we can hopefully use the SOUND, ENV and ENT commands to their full, we 
can look at various other associated commands and functions. 


In describing the channel number of the SOUND command, you will remember that 
by adding 64 to it, the sound was marked as 'held' so that it would remain in the 
queue, without playing until released. The way in which a sound can be released is by 
use of the RELEASE command. The word RELEASE is followed by a bit significant 
number, where each bit is used to indicate one of the three possible channels to be 
released. Once again, it is not important to fully understand this, as long as you 
realisethat: 


4 meanschannel C 
2 meanschannel B. 
1 meanschannel A 


гапа a combination of channels is released by adding up the values for each of the 
channels. So, to release held sounds on all three channels the following would be 
used: 


RELEASE 7 


Where 7 = 1 + 2 + 4. If no channels are held, then the RELEASE command is 
ignored. Try the following: 


SOUND 1+64,98 
SOUND 2*64,140 
SOUND 4*64,215 
RELEASE 3: FOR t-1 TO 1000: NEXT: RELEASE 4 
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The sounds that you might expect from these SOUND commands аге not produced 
until the first RELEASE command which allows the sounds on channels А and B to 
play. After the delay, the sound on channel C is RE LEAS Ed. 


There is yet another method by which more than one sound can be made to 
rendezvous. When a sound is added to a queue that has the hold bit set (64 added), 
then it is not just that sound which is held, but all subsequent sounds sent to that 
queue. If more than four further sounds are sent to the held queue, then the machine 
will pause until the queue is released, perhaps by using a sub-routine that is called 
after a fixed period of time (using AFTER or EVERY). However this is not a 
particularly good method for using the sound system, as the program that contains 
the sound commands may pause from time to time as the sound queues fill up. This is 
also true if a lot of long sounds are added in quick succession. Try this: 


18 FOR a=1 TO 8 

20 SOUND 1,100*a,200 
30 NEXT 

40 PRINT "hello" 


You will notice that the word ‘he L Lo’ does not appear instantly, but only after the 
first three sounds. This is because program execution cannot continue until there is a 
free space in the queue. 


Тһе BASIC contains an interrupt mechanism, rather like that used in the AFTER 
and EVERY commands, and in ON BREAK GOSUB. This enables you to specify a 
sound playing sub-routine that is only called when a free space appears in the 
required queue. Try this: 


18 а=й 

20 ON SQ(1) GOSUB 1000 

30 PRINT a; 

40 GOTO 30 

1000 а=а+10 

1010 SOUND 1,a,200 

1020 IF a«200 THEN ON SQ(1) GOSUB 1000 
1030 RETURN 

run 


You will notice that the program never pauses. The SOUND command is only called 
when channel A's queue (number 1) has a free slot. This condition is detected by the 
ON SQ(1) GOSUB command in line 20. The command initialises an interrupt 
mechanism that will call the sound sub-routine when a free slot appears in the 
specified queue. Once ON 58 GOSUB has been used, it must be re-initialised, 
and this is done by line 1020 in the sound sub-routine. In this example, the sound 
sub-routine only re-initialises itself while the value of‘a’ is less than 200. 
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Inacomplete program that may be moving objects on the screen, adding up totals and 
the like, a background tune can be kept continually playing by having a sub-routine 
called to play each note only when there is a free slot in the queue. This ensures that 
the program does not pause while waiting for a free slot to appear. If the note values 
forthistune were being read from DATA statements, then the sound routine could be 
set stop re-initialising itself just before the data is exhausted. 


The number withinthebracketsofthe ON 50() GOSUB commandcanbe 1,2or 
4depending on which channel queue is to be tested for a free slot. 


There is a function SQ ( ) that may be used within a program to read the current state 
of any of the sound channels. The number within the brackets after SQ is again 1, 2, 
or 4, to specify for which channel the information should be returned. The function 
returns a bit-significant number and will again require an understanding of binary 
numbers to decipher it. The bits of the value returned have the following significance: 


BIT DECIMAL MEANING 


0,1,2 1,2,4 Number of free spaces in the queue 
3 8 Note at head of queue is marked to rendezvous with A 
4 16 Note at head of queue is marked to rendezvous with B 
5 32 Note at head of queue is marked to rendezvous with C 
6 64 Тор note in queue has hold bit set (the queue is held) 
7 128 А note iscurrently playing 
Try this simple example: 

10 SOUND 2,200 

20 х=59(2) 

30 PRINT BIN$(x) 

run 


This will print the binary number 10000100, in which bit 7 is set, indicating that 
the channel was currently playing when the SQ function was used. The last three 
digits 100, when converted to decimal give the value 4 indicating that there were 4 
free entries in the queue. This function may be used to test a queue's status at a given 
point within a program - unlike ON SQ() GOSUB which will test and react to a 
queue's status at an indeterminate point. 


So far, all the examples have just dealt with one or two notes of sound. Processing a 
whole group of unrelated notes, for example in a piece of music, can be achieved by 
listing the required notes in a DATA statement, from where they can be READ intoa 
SOUND command: 
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Тһе final 


FOR octave=-1 TO 2 


FOR x=1 TO 7: REM notes per octave 
READ note 

SOUND 1,note/210ctave 

NEXT 

RESTORE 

NEXT 

DATA 426,379,358,319,284,253,239 


example program in this section greatly elaborates on this basic principle. 


The tune and rhythm play on channels A and B, using rendezvous to keep in step. The 
example demonstrates one of the ways in which DATA can be formatted so as to 
include note, octave, length and rendezvous information: 


10 
20 
30 
48 
50 
60 
70 
80 
90 
100 
110 
120 
130 
140 
150 
168 
178 
188 


190 


200 
210 
220 
238 


REM Line 198 gives treble clef tune 
REM (іле 200 gives bass clef tune 
DIM scaleX(12):FOR xX-1 TO 12:READ scaleX(xX) :NEXT 
Ch1X21:READ ch1$:ch2X-1:READ сһ25 
cts 

SpdX-12 

scale$=" a-b b сәс d-e e +++ 9+9" 
ENV 1,2,5,2,8,-1,10,10,0,15 

ENV 2,2,7,2,12,-1,10,10,0,15 

ENT -1,1,1,1,2,-1,1,1,1,1 

DEF FNM$(s$,s)-MID$(s$,s,1) 


IF chiz+ch2%>@ THEN 140 

END 

DATA &777,&870c,86a7 ,&647 ,&5ed,&598 

DATA 2547,841с,8464,8470,8431,8314 

DATA 4сг414111191А1-В2С2149291А1-В6А2Сг1+191+191а1- 
b'1A1-b2C2g2A2g2f 1g1a2g2f6e2c2e2c2g2e2c1-BTA2g2f4e4d 
Bc4f3fic2d4-b2fr2-B2A2g2f6e2gráC4-Blalfi-b1g2c2-báa 
4g4fr6A2A2-B4-B2Ar2-B2A2g2f6e2g4C4-BTATf 1-B1g2C2-B4 
A&gBf. 

DATA г41441814е4с41г814е212е442е248с8с6е2149498е413+ 
15497894 сг4е4с61244с4с81г8-е49г898с4е4с61244с4с81. 
REM send sound to channel А 

p1S=FNMS(ch1$,ch1%) 

IF р1$<>"г" THEN r1X-8:GOTO 240 
r1%=16:ch1%=ch1%+1:p1$=FNM$(ch1$,ch1%) 


continuedon the next page 
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548 
550 
run 


IF p1$z"." THEN ch1%=@:RETURN ELSE L1Z-VAL(Cp1$) 
ch1%=ch1%+1 

n1$=FNM$(ch1$,ch1%) 

ch1X=ch1X+1 

IF n1 +" OR п1$="-" THEN 350 

п1$= nis 
nd1Z=(1+INSTR(scale$,LOWERS(n1$)))/2 

IF ASCC(RIGHT$(n1$,1)0)»296 THEN 01%=8 ELSE 01%=16 
SOUND 1+r1%,scale%(nd1%)/01%,Spd%*l1%,0,1,1 
ON SQ(1) GOSUB 290 

RETURN 

015-15%ҒММ5(сҺ15,сҺһ1Х) 

сһ1Х-сһ1%%1 

GOTO 300 

REM send sound to channel B 
p2$-FNM$(ch2$,ch22) 

IF p2$«»"r" THEN r22-0:G0TO 420 
r2X-8:ch2X-ch2241:p2$zFNn$(ch2$,ch22) 

IF p2$-"." THEN ch2%=O:RETURN ELSE L2X-VAL(p2$) 
ch2X-ch2X*1 

n2$-FNM$(ch2$,ch22) 

ch2X-ch2X*1 

IF п2$="+" OR п2$="-" THEN 530 

n2$z" "+n2$ 
nd2%=(1+INSTR(scale$,LOWERS(n2$)))/2 

IF ASCCRIGHTS(n2$,1))>96 THEN o2X-4 ELSE 02%=8 
SOUND 2*r2X,scaleX(nd22)/o2Z,SpdX*l2X,0,2 

ON SQ(2) GOSUB 380 

RETURN 

п25-п25%ҒММ5(сһ25,сһ2Х) 

сһ2Х-сһ2Х%1 

GOTO 480 


Graphically speaking.... 


This section describes the graphics facilities available. The first example builds up 
slowly demonstrating each major feature in turn. 


Tostart off with, we will divide the screen into a text window (line 40) and a graphics 
window (line 30), setting the MODE and a couple of flashing colours along the way 


(line 20): 
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10 REM mask and tag in window 

20 MODE 1:INK 2,10,4:INK 3,4,10 
38 ORIGIN 440,100,448,640,100,3008 
40 WINDOW 1,26,1,25 

50 cLG 2 


If you RUN this program you will see а square of flashing colour halfway down the 
right-hand side of the screen. This square has been cleared to ink number 2 (flashing 
magenta/cyan) by line 50, and the origin of co-ordinates has been moved to the 
bottom left hand corner of the square. The M0DE command has set the graphics 
cursor to the origin of co-ordinates (X=0, Y=0) so we can draw a diagonal line across 
thesquare with line 60: 


60 DRAW 200,200,3 
RUN thenew program tosee the effect. Now add: 
80 MOVE 0,2:FILL 3 


Line 80 puts the graphics cursor just inside one of the two halves of the square and 
fills it with ink 3. The boundary of the fill is the edge of the graphics window (in this 
case also the edge of the square) and anything drawn in the current graphics pen (3) 
oranything drawn in the ink being used to fill (also 3). 


Now RUN the resulting program. 


To prove the point about ‘fill’ edges, add line 78 below. Note that it is only the fact 
that the fill is in the same ink as the diagonal line that restricts the fill to half the 
square. 


70 GRAPHICS PEN 1 
run 


Edit line 80 to FILL with ink 1 then RUN to prove this last point. Then restore it 
back totheoriginal(FILL 3). 


Now add lines 100 to 149, which draw a box: 


100 MOVE 20,20 
110 DRAW 180,20 
120 bRAW 180,180 
130 DRAW 20,180 
140 DRAW 20,20 
run 
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The box is drawn in ink 1 because of line 70. If line 70 were omitted then we would 
need to adda* , ' either as the third parameter ofthe MOVE command in line 1 80, or 
the third parameter of the DRAW command in line 110 in order to instruct the 
computer to change graphics pens. 


Join the dots.... 


Lines need not be solid, they can be dotted. The MASK command allows us to specify 
the size of the dots. The pattern will repeat every 8 pixels and each subsequent line 
will continue the dotting scheme from where the last line left off.-A new MASK 
command (probably with the same parameter as the current one) will reset the 
dotting logicto the start ofthe 8 pixel pattern. 


The dotting pattern is actually a single byte binary number where the bits set 
indicate where to put pen ink. In our example we will use a binary constant (called ир 
by the “ХЭ indicating that we want four pixels drawn in the middle of each 8 pixel 
group, with the two either side not drawn. This will give a dashed line with four 
pixels on and four pixels off. To do this, add: 


90 MASK 8Х00111100 
run 


But hold on a moment! This program does not give us a smooth continuation of the 
dotting around the corners as we expected. The reason for this is that each corner 
point is actually plotted twice, once as the last pixel of one line, and again as the first 
pixel of the next line. A clumsy way around this is to type in: 


115 MOVE 180,22 
125 MOVE 178,180 
135 MOVE 20,178 
run 


‘hich produces the desired effect. However there is a simpler way, which is to add a 
ond parameter ‘, Ø’ to the end of the MASK command which tells the computer 
NOT to plot the first point of each line. Edit line 90 to read: 


90 MASK &09111100,0 
гапа delete the lines you just added by typing: 
115 


125 
135 
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Now RUN, and once again the dotted box is symmetrical. Note that if the second 
MASK parameter is‘, 1' the command will be reset to draw whole lines including the 
first pixel. 


Now look in between the dashes of the line. There is something in the bottom right 
triangle which is not in the top left triangle. This is the graphics paper, which is set to 
ink 2 by the CLG 2 command in line 50, but is invisible in the top left triangle 
because it is the same colour as the background. Alter line 50 to read: 


50 CLG 2:GRAPHICS PAPER @ 


...and re-run the program. The paper now shows up clearly all round the box. 


It is possible make the graphics paper invisible, or, as we call it ‘transparent’. This 
means that a dotted line drawn over an existing picture will preserve the gaps 
between the dots. The graphics drawing is made transparent by adding a ° , 1” 
parameter to the GRAPHICS PEN command. (It is reset to non-transparent or 
‘opaque’ by a‘, 8’ parameter). Alter line 70 to read: 


70 GRAPHICS PAPER 1,1 


run view 


ind observe the result. 


‘As well as drawing lines (and plotting points) it is possible to write normal text 
characters at the position of the graphics cursor. This has the advantage that we can 
position the characters with much greater accuracy (within one pixel rather than 
within 8 pixels) and also that we can draw characters with the added flavour of 
graphics ink modes (see ahead). 


To write characters at the graphics cursor location, simply position the graphics 
cursor at the top left-hand corner of where you want the character to be drawn, then 
issue the command TAG (or TAG #1 etc, for other text streams) followed by normal 
PRINTing commands. The graphics cursor is automatically stepped right by 8 pixels 
after each character is drawn. Add: 


160 MOVE 64,108 
170 TAG 

180 PRINT "SALLY" 
190 TAGOFF 

run 


(Any messages output by BASIC will be sent to the text screen irrespective of the 
state of the TAG/TAGOFF switch, but it is good practice to cancel the TAG 
assignment as soon as the T A Gging is over.) 
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But what are the arrows after the name? Well, these are carriage-return CHR$ (13) 

and line-feed C HR $ ( 10) symbols. The graphics drawing software translates all of 
the first 32 ASCII characters into their printable versions (as if they were each 
preceded by a CHR$ ( 1) ; when sent to the text screen). The reason for this is that 
most of the first 32 control codes are meaningful only to the text screen. By the same 
token for example, if we overflow to the right of the graphics window, no wrap-around 
is performed. 


‘The carriage-return and line-feed symbols can be suppressed by the normal 
technique of ending the PR INT statement with a semicolon, i.e: 

180 PRINT "SALLY"; 

run 


Text sent to the graphics screen using TAG is influenced by the same GRAPHICS 
PEN commands as the line drawing. Thus currently, the name is written in 
GRAPHICS PEN 1,andistransparent. The command: 


158 GRAPHICS PEN 1,0 
run 


„will switch back to opaque paper, whilst: 


150 GRAPHICS PEN @,1 
run 


... Will write with ink number Ø, transparently. 


Now delete line 150 and RUN again. Ink number 1 + transparent mode (previously 
set in line 7 Ø) will be restored to the graphics pen. 


Transparent characters 


It is also possible to write characters to the text screen transparently, by using one of 
the control codes provided. Add: 


200 PRINT #2,CHRS$(22);CHRS(1) 
210 LOCATE #2,32,14:PRINT Й2,"ххжяжы" 


220 LOCATE #2,32,14:PRINT #2," _____' ж 
230 PRINT #2,CHR$(22);CHRS(0) 
run 


Line 200 sets stream # 2 to transparent mode. Note how the underlining appears to 
‘overstrike’ the asterisks. This demonstrates that it is possible to build up composite 
characters, even in multiple colours. Line 23@ switches off transparent mode, 
setting stream # 2 back to opaque mode. 
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Inkmodes 


It is possible to draw using a graphics ink mode which combines the current drawing 
with the ink already on the screen. The final ink for each pixel is calculated by 
forming the logical combination of the old ink for the pixel with the graphics ink (pen 
or paper) being plotted. The logical combinations provided аге XOR, AND and OR. 
The ink mode can be set either as the fourth parameter of DRAW/DRAW R, 
PLOT/PLOTR and MOVE/MOVER commands or by PRINTing a CHR$ (23); 
CHR$ (mode: ) control code sequence. In each case a value of 1 sets ХОБ plotting, 2 
sets AND plotting and 3 sets OR plotting. A value of 0 restores the ‘force’ mode, 
where the graphics ink is used ‘as is’. 


The next example demonstrates the use of the XOR combination. XOR is often used 
in so-called Turtle Graphics because it has the property that drawing the same 
pattern twice restores the original image. Thus the square drawing routine is 
executed twice (in lines 118 and 130), and the TAGged printing is also executed 
twice (in lines 170 and 190). The FRAME commands cause enough delay to make 
the effect visible. Note the use, in line 90, of commands without a first parameter. 
This is quite in order in these commands, and simply leave the current settings of the 
first parameter unchanged. 


The third parameter ( , 1) of the MOVE command in line 220 sets the GRAPHICS 
PEN to 1, overriding the ‘3’ set in line 68. The XOR mode is set by the fourth 
parameter of the DRAWR command in line 230. Note once more the missing 
parameter. 


A reminder of the first-point plotting effect can be seen by removing the MASK 
command in line 90. The corners of the square disappear because they are drawn 
twice (at the end of one line and the start of the next) and are therefore cancelled out 
by the XORing action. 


10 REM XOR ink modes 

20 MODE 1:1NK 2,10:INK 2,4 

30 ORIGIN 440,100,440,640,100,300 
40 WINDOW 1,26,1,25 

50 CLG 2:GRAPHICS PAPER Ø 

60 DRAW 200,200,3 

70 MOVE 2,0:FILL 3 

80 ORIGIN 440,0,640,640,0,408 
90 GRAPHICS PEN ,1:MASK ,0 
100 FOR у-6Й TO 318 STEP 2 
110 60508 220 

120 FRAME:FRAME 

130 GosuB 220 
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148 NEXT 

150 TAG 

160 FOR у-60 TO 318 STEP 2 
170 MOVE 96,y:PRINT CHR$(224); 
180 FRAME:FRAME 

190 MOVE 96,y:PRINT CHRS(224); 
200 NEXT 

210 END 

220 MOVE 98,y,1 

230 DRAWR 20,0,,1 

240 DRAWR 0,20 

250 DRAWR -20,0 

260 DRAWR 0,-20 

270 RETURN 

run 


Animation 


It is possible to produce an animation effect by switching the colours assigned to inks. 
Although the contents of the screen memory are unchanged, there appears to be 
movement. An example of this is included in the ‘Welcome’ program on your master 
system disc (type RUN "disc" to see that demonstration). The simple palette 
switching of that example is not enough however, if the animated patterns are 
required to overlap. The next example uses ORing of inks to write the numbers 1 to 4 
onto the screen. (The shape is determined by scanning the character printed at the 
bottom left hand corner and reproducing what is found, in big block graphics.) The 
numbers are written in turn using inks 1,2,4 and 8 with the OR mode turned on - in 
this case with a control character sequence, see line 50. 


Lines 160 onwards rotate the palette according to a mathematical formula which 
results in one block graphics number at a time being displayed. The inks are set by 
inspecting each ink in turn and determining if it includes the binary component that 
we are looking for. For example, the number 3 was drawn in ink 4 and therefore to 
show the number 3 we must allocate a visible colour to all inks whose number 
contains a binary 4. Those inks are: 


4(0100),5(0101),6 (0110), 7 (0111), 12 (1100) , 13 (1101), 14 (1110), 15 (1111) 


In a practical application the inks which require to be changed at each stage in the 
animation would be calculated, and lines 180 to 200 would be replaced by а 
speedier section of program. 
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REM latch animation 
ON BREAK GOSUB 220 

FOR 1=1 TO 15:INK i,26:NEXT 
m(1)=1:m(2)=2:m(3)=&:m(&)=8 
MODE RINT CHR$(23);CHR$(3);:TAG 

FOR P=1 TO & 
GRAPHICS PEN m(p),1 

LOCATE #1,1,25:PRINT#1,CHRS(48+p); 

FOR х=0 TO 7 

FOR у= @ TO 14 STEP 2 

IF TEST(x*&,y)=Ü THEN 148 

MOVE (x*6)*32,C(y*6)*16:PRINT CHR$(143); 
MOVE (x*62*32,Cy*7)*16:PRINT CHRS$C143); 
NEXT y,x,p 

LOCATE #1,1,25:PRINT#1," "; 

FOR р-1 TO 4 
1 TO 25:FRAME:NEXT 


TO 15 
190 IF (i AND m(p))=@ THEN INK 1,0 ELSE INK 1,26 
200 NEXT i,p 
210 coro 160 
220 ІМК 1,26 
run 
Colour plane sprites 


Inthe example above we have seen how, having written graphics in inks 1,2, 4 and 8, 


an animat 


tion effect can be produced by colour changing. If the same inks are used, 


but the colours set up in a different way then a completely different effect can be 


produced. 
below. 


This effect is known as 'colour planes' and is demonstrated in the example 


REM mountains 
DEFINT a-z 
INK 0,1:INK 1,26 


INK 2,6:1NK 3,6 
FOR i TO 7:1NK i,9:NEXT 

FOR TO 15:1NK 1,28:МЕХТ 

MODE DEG:ORIGIN 8,150:CLG:MOVE 0,150 
FOR x=16 TO 640 STEP 16 
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90 DRAW x,COS(x)*150Ü+RND*100,4 


100 
118 
128 
138 
148 
150 
160 
170 
180 
190 
200 
210 
220 
230 
240 
250 
260 
270 
280 
290 
300 
316 
320 
330 
340 
350 
360 
370 
380 
390 
408 
418 
420 
430 
448 
run 


NEXT 

MOVE 0,0:FILL 4 

cx=175:G0SU8 320 

cx=525:G0SU8 320 

SYMBOL 252,0,0,8C,&1F,830,&7F ,&FF 
SYMBOL 253,0,6,8E,&F2,2,&F2,&FE 
SYMBOL 254,8,&60,&70,&7F ,&7F ,&7F ,&7F 
SYMBOL 255,0,0,0,&FB,&EC,&FE,&FF 
pr$-CHRS(254) *CHR$(255) 

HR$(252) «CHR$(253) 


FOR x--32 TO 640 STEP 4 

x2-((608-x)*2)MOD 640:hl=RND*10:hr=50*SIN(x) 
GRAPHICS PEN 8,1:MOVE x,100+hr,,3:PRINT pr$; 
GRAPHICS PEN 2,1:MOVE x2,115*hL,,3:PRINT pl$; 
IF (TEST(x2-2,115*hl-12) AND 8)=8 THEN 380 

IF TIME-t!«30 THEN 260 

FRAME:t!-TIME 

GRAPHICS PEN 7,1:MOVE x,100+hr,,2:PRINT рг5; 
GRAPHICS РЕМ 13,1:MOVE x2,115+hl,,2:PRINT pl$; 
NEXT 

GOTO 210 

MOVE cx,100 

FOR х=й TO 360 STEP 10 

DRAW cx+SIN(x) *50+10*RND,100+COS(x)*25+1B*RND,1 
NEXT 

DRAW сх,100:М0УЕ cx,9Ø:FILL 1 

RETURN 

ENT -1,1,1,1 

SOUND 1,25,400,15,,1,15 

FOR у=100+һг TO -132 STEP -2 

GRAPHICS PEN 7,1:MOVE x,y,,2:PRINT pr$; 
GRAPHICS PEN 8,1:МОМЕ x,y-2,,3:PRINT pr$; 
NEXT 

сото 70 


To explain how this works we must, once again, visualise the INK number in binary. 
Starting with the highest INK number (15), all the INKs with the '8' bit present (15 
down to 8) are set to cyan. Then all the INKs with the '4 bit present (7 down to 4) аге 
set to green. INKs 2 and 3, each with the 2’ bit present are set to red, and finally INK 
1 is set to bright white, with INK Ø remaining as blue 
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On the screen the graphics аге ORed into place - see lines 230 and 240. Тһе colour 
seen on the screen in any particular pixel is determined by the most significant bit of 
the resultant at that point. Therefore an image in a “more significant' plane will 
always obscure an image in a “less significant' plane, but the background will be 
preserved and can be seen again if the ‘more-significant’ image is removed. The way 
to remove an image is to plot it using the AND ink mode with INK numbers of 7,11,13 
or 14 removing original INKsof8,4,2 and 1 respectively -see lines 280 and 290. 


Each of the above 4 programs demonstrates particular aspects of graphics on the 
CPC664. Graphics is potentially the most exciting aspect of computing, and much of 
the excitement is generated by the ingenuity of you the programmer. It would be 
impossible to summarise the computer's full graphics capabilities in this instruction 
manual, and we suggest that you continue to experiment with the many graphics 
commands and functions provided. 


The machine itself... 


To conclude this chapter, a few words about the inside of your 
computer. 


The CPC664 is based around the Z80 microprocessor. The machine also contains a 
32K ROM that is addressed in two halves, the upper half contains the BASIC 
interpreter which lives in the memory map from &C000 to &FFFF. The lower half is 
mapped from &0000 to &4000 and contains the firmware which carries out all the 
mundane tasks such as running the machine, reading the keyboard, driving the 
screen, etc. 


The CPC664 also contains a ULA that enables the 8 bit CPU to address more than 
64K of memory. This is why the screen and the BASIC ROM can have the same 
address. The top 16K of RAM is used by the 6845 video controller chip to store the 
pixel colour information that generates the picture. The keyboard is scanned by the 
8255 parallel interface chip, which is also used to drive the AY-3-8912 sound chip. 


The printer port is provided by an 8 bit latch. There are 7 data bits, while the eighth 
bit is used to latch the strobe signal. At the expansion port, all the standard Z80 bus 
signals are brought out to the edge connector, but they are not buffered. 


For further technical details of this computer including circuit diagrams, PCB 
layouts, etc, consult the CPC664 Service Manual, available from AMSTRAD. 
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Appendix 1 
Digital Research & AMSTRAD 


End User Program 
Licence Agreement 


NOTICE TO USER - PLEASE READ THIS NOTICE CAREFULLY. DO 
NOT OPEN THE DISKETTE PACKAGE UNTIL YOU HAVE READ 
THIS LICENCE AGREEMENT. 


OPENING THE DISKETTE PACKAGE INDICATES YOUR AGREE- 
MENT TO BE BOUND BY THESE TERMS AND CONDITIONS. 


1. Definitions 


-In this Licence Agreement, the terms: 


1. DRI means DIGITAL RESEARCH (CALIFORNIA) INC., Р.О. Box 579, Pacific 
Grove, California 93950, owner of the copyright in, or authorised licensor of, the 
program. 


2. Machine means the single microcomputer on which you use the program. 
Multiple CPU systems require additional licences. 


3. Program means the set of programs, documentation and related materials іп 
this package, together with all ancillary updates and enhancements supplied by 
DRI to you regardless of the form in which you may subsequently use it, and 
regardless of any modification which you make to it. 


4. AMSTRAD means AMSTRAD CONSUMER ELECTRONICS PLC., Brentwood 
House, 169 Kings Road, Brentwood, Essex CM14 4EF. 
You assume responsibility for the selection of the program to achieve your 
intended results, and for the installation, use and results obtained from the 
program. 
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2.Шсепсе 


Youmay: 


£ 
2. 


Use the program оп a single machine. 


Copy the program into any machine readable or printed form for backup or 
modificaton purposes in support of your use of the program on a single machine. 
You may make up to 3 (three) copies of the program for such purposes. (Certain 
programs, however, may include mechanisms to limit or inhibit copying. They 
are marked ‘copy protected’). Copying of documentation and other printed 
materials is prohibited. Disassembly of code is prohibited. 


Modify the program and/or merge it into another program for your use on the 
single machine. (Any portion of this program merged into another program will 
continue to be subject to the terms and conditions of this Agreement). 


Transfer the program and licence to another party if you notify DRI of name and 
address of the other party and the other party agrees to a) accept the terms and 
conditions of this Agreement, b) sign and forward to DRI a copy of the 
registration card and c) pay the then current transfer fee. If you transfer the 
program, you must at the same time either transfer all copies, including the 
original, whether in printed or machine readable form to the same party, or 
destroy any copies not transferred; this includes all modifications and portions 
of the program contained or merged into other programs. 


You must reproduce and include the copyright notice on any copy, modification or 
portion merged into another program. 


EACH DISKETTE IS SERIALISED, AND YOU MAY NOT USE, COPY, 
MODIFY, TRANSFER, OR OTHERWISE MAKE AVAILABLE TO ANY 
THIRD PARTY, THE PROGRAM, OR ANY COPY, MODIFICATION OR 
MERGED PORTION, IN WHOLE OR IN PART, EXCEPT AS 


EXPRESSLY PROVIDED FOR IN THIS LICENCE AGREEMENT. 


IF YOU TRANSFER POSSESSION OF ANY COPY, MODIFICATION 
OR MERGED PORTION OF THE PROGRAM TO ANOTHER PARTY, 
YOUR LICENCE IS AUTOMATICALLY TERMINATED. 
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3.Term 


The licence is effective until terminated. You may terminate it at any other time by 
destroying the program together with all copies, modifications and merged portions 
in any form. it will also terminate upon conditions set forth elsewhere in this 
Agreement or if you fail to comply with any term or condition of this Agreement. You 
agree upon such termination to destroy the program together with all copies, 
modifications and merged portions in any form 


4. Limited Warranty 


THE PROGRAM IS PROVIDED 'AS IS. NEITHER DRI NOR 
AMSTRAD MAKE ANY WARRANTY OF ANY KIND, EITHER 
EXPRESSED OR IMPLIED, INCLUDING, BUT NOT LIMITED TO THE 
IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS 
FOR A PARTICULAR PURPOSE. THE ENTIRE RISK AS TO THE 
QUALITY AND PERFORMANCE OF THE PROGRAM IS WITH YOU. 
SHOULD THE PROGRAM PROVE DEFECTIVE, YOU (AND DRI OR 
AMSTRAD) ASSUME THE ENTIRE COST OF ALL NECESSARY 
SERVICING, REPAIR OR CORRECTION. 


Neither DRI nor AMSTRAD warrant that the functions contained in the program 
will meet your requirements or that the operation of the program will be 
uninterrupted or error free. 


However, AMSTRAD warrants the diskette on which the program is furnished, to be 
free from defects in materials and workmanship under normal use for a period of 
ninety (90) days from the date of delivery to you as evidenced by a copy of your receipt. 


5. Limitations of Remedies 


AMSTRAD's entire liability and your exclusive remedy shall be the replacement of 
any diskette not meeting this ‘Limited Warranty’ and which is returned to AMSOFT 
with a copy of your receipt. 


IN NO EVENT SHALL DRI OR AMSTRAD BE LIABLE FOR ANY 
DAMAGES, INCLUDING ANY LOST PROFITS, LOST SAVINGS, OR 
OTHER SPECIAL INDIRECT OR CONSEQUENTIAL DAMAGES, 
EVEN IF DRI OR AMSTRAD HAS BEEN ADVISED OF THE 
POSSIBILITY OF SUCH DAMAGES, OR FOR ANY CLAIM ВҮ ANY 
OTHER PARTY. 
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6. Registration Card 


DRI may from time to time update its programs. Updates will be provided to you only 


if a properly signed registration card is on file at DRI's main office or an authorised 
registration card recipient. DRI is not obligated to make any program updates, or to 


supply any such updates to you. 


T. General 


You may not sublicence, assign or transfer the licence or the program except as 


expressly provided in this Agreement. Any attempt otherwise to sublicence, assign or 


transfer any ofthe rights, duties, or obligations hereunder is void. 


This Agreement shall be governed by and construed in accordance with the laws of 


England. 


Should you have any questions concerning this Agreement, you may contact DRI by 
writing to Digital Research Inc., P.O. Box 579, Pacific Grove, California 93950. 


THIS AGREEMENT CANNOT AND SHALL NOT BE MODIFIED BY 
PURCHASE ORDERS, ADVERTISING OR OTHER REPRESENTA- 
TIONS BY ANYONE, AND MAY ONLY BE MODIFIED BY A WRITTEN 
AMENDMENT EXECUTED BY YOU AND AN AUTHORISED 
OFFICER OF DRI AND AMSTRAD. 


YOU ACKNOWLEDGE THAT YOU HAVE READ THIS AGREEMENT, 
UNDERSTAND IT AND AGREE TO BE BOUND BY ITS TERMS AND 
CONDITIONS. YOU FURTHER AGREE THAT IT IS THE COMPLETE 
AND EXCLUSIVE STATEMENT OF THE AGREEMENT BETWEEN 
YOU AND DRI AND AMSTRAD WHICH SUPERSEDES ANY PRO- 
POSAL OR PRIOR AGREEMENT, ORAL OR WRITTEN, AND ANY 
COMMUNICATIONS BETWEEN YOU AND DRI OR AMSTRAD 
RELATING TO THE SUBJECT MATTER OF THIS AGREEMENT. 


THIS AGREEMENT DOES NOT AFFECT YOUR STATUTORY 
RIGHTS. 
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Аррепаїх 2 
Glossary of Terms 


Some commonly used terms from the world of computing, 
explained for CPC664 users.... 


Accumulator 


A memory location within the microprocessor circuit at the “heart of the 
microcomputer that stores data temporarily while it is being processed. Used 
extensively in machine code programming - BASIC users need never know it exists! 


Acoustic coupler 


Also known as an Acoustic Modem. An electronic attachment for a computer that 
connects a telephone handset to the computer and enables the latter to communicate 
over the normal voice telephone network. In this way, a computer can communicate 
with public information systems such as PRESTEL, and with other users of home 
computers, in order to exchange software, get data and information etc. 


Address 


The number in an instruction that identifies the location of a ‘cell’ in a computer's 
memory. By means of its address, a particular memory location can be selected so 
that its contents can be found and ‘read’, in the case of RAM, both written and read. 


Adventure game 


A cult with some, and a bore to others. A text-based computer game in which the 
player is invited to participate in a series of pseudo random events based on trying to 
find a way around a maze or labyrinth. 


Algorithm 


A grandiose name for a complicated formula or sum. A sequence of logical and 
arithmetic steps to perform a defined task in computing. 


Alphanumeric 


The attribute that describes the difference between a letter or number and a graphics 
character. 
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АШ 


Arithmetic Logic Unit. Тһе part of a microprocessor that carries out arithmetic and 
logical operations - not of direct concern except in machine code programming. 


Ambiguous File Name 


A file name containing опе or more wildcard characters. Ambiguous filenames refer 
to more than one specific file name and are used to refer to one or more files at a time. 


AMSDOS 


AMStrad Disc Operating System, The program that allows Locomotive BASIC to 
access disc files. 


AMSOFT 


AMSTRAD’s specialist computer support division, supplying software, peripherals, 
publications, specifically to enhance the CPC664 and its many applications. 


A/D 

Analogue 

A state where change between a start and finish point occurs gradually rather than 
instantaneously, Computers are digital devices - most of the natural world is based 


on analogue principles, thus the computer has to perform an analogue to digital (A/D) 
conversion before it can process data from an analogue source. 


Animation 


Cartoons are the best known form of animation - computer animation is based on the 
concept of moving graphics to simulate the idea of ‘live’ movement. 


Applications program 


A program with a specific task rather than a general purpose software ‘tool’ such ав 
an assembler, printer driver etc. 


Arcade Game 


The type of moving action computer video game where for example, spacemen invade 
and are vanquished, or insatiable monsters chase around a maze and gobble up the 
unwary. Figures under the control of the user have to avoid all manner of unpleasant 
‘deaths’. Generally good for the reflexes but of little educational benefit for the 
computer student. 
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Architecture 


The plan relationship of the databus, peripheral and CPU handling aspects of a 
microcomputer. 


Argument 


An independent variable, e.g. in the expression x+y=z, the terms x, y, and z are the 
arguments. 

Array 

A 2 dimensional matrix (grid) in which data is stored by addressing with the 
‘horizontal’ and ‘vertical’ co-ordinates. 

Artificial intelligence Al 

A structure in program techniques that enables the program to learn from its past 
experience. 

ASCII 


American Standard Code for Information Interchange. A commonly used way of 
representing the numbers, letters and other symbols that can be entered from the 
computer’s keyboard or invoked using a variety of other commands. 


Assembler 


The practical method for programming in machine code, where the machine code 
instructions are invoked by mnemonics (letters that suggest the function being 
performed by the corresponding machine code routine). 


Backup 

A duplicate copy of information used as a safeguard in case the original is lost or 
accidentally damaged. Making a backup refers to the process of duplicating a disc or 
disc file. 

Barcode 

A computer readable printed code that can be read by optical techniques such as 


scanning by a low power laser. Look at the bottom of a box of soap powder to see an. 
example. 
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Base 


'The prime numeric consideration of any mathematician. The basis of any system of 
number representation. The binary system has base 2; the decimal system has base 
10, and the hexadecimal system has the base 16. 


BASIC 


Beginners’ All-purpose Symbolic Instruction Code. An interpretive programming 
language used in almost all home computers. BASIC was specifically designed to be 
easy to learn and simple to use since it allows for programs to be ‘glued’ together and 
tested at any point in their development; as opposed to compiled types where the 
complete program must be run before any aspect can be properly tested. 


Baud 
A bit per second. The unit for measuring the rate at which digital data is transmitted 


in serial communication systems, 


BCD 


Binary Coded Decimal. A coding system for decimal numbers in which each digit is 
represented by a group of four binary digits. 


BDOS 
Basic Disc Operating System. This is the part of the CP/M operating system which 
provides an interface for a user program to use the functions of CP/M. 


Benchmark 


A standard task that can be given to different computers to compare their speed, 
efficiency and accuracy, e.g. calculating the square root of 99.999 squared. 


Binary 
The number system with base 2, in which all numbers are made up from the two 


‘binary digits 0 and 1. (See part 1 of the chapter entitled ‘At your leisure....’.) 
Binary number 


A number represented in binary notation. Signified in CPC664 programming by the 
prefix &X. e.g. &X0101 — (decimal) 5. 
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BIOS 


Basic Input/Output System. This is the hardware dependent part of CP/M that is 
written specifically for one type of computer. АП the input and output to the screen, 
keyboard, disc and soon is performed through the BIOS. 


Bit 


Shortform of BInary digiT. А binary digit is one of the two digits, represented by 0 
and 1, that are used in the binary number system. 


BitSignificant 


Where the information contained in a number is extracted by considering the state of 
each of the eight bits that make up the complete byte. The overall decimal value may 
haveno meaning. 


Boot 


The process of loading an operating system into memory. When CP/M is started from 
BASIC a small boot program is loaded automatically from the disc, which then loads 
therestoftheoperating system into memory. 


Booting or Bootstrapping 


Programs and operating systems don't load themselves, they are 'bootstrapped' by a 
small routine in ROM (usually), that initiates the loading processes at a specific 
location in memory. 


Boolean algebra 
Is the statement of logical relationships where there can only be two answers: true or 
false. Usually signified as 0 or 1. 


Buffer 


Anarea of memory reserved for temporarily storing, or buffering, information during 
an information transfer. I 


Bug 


A problem on a scale ranging from an “unexpected feature' based on some obscure 
aspect of the use of a program (e.g. if you press four keys at once, the sereen changes 
colour), to a sequence that completely and irrevokably crashes a computer program 
and wipesthe memory clean of all data. 
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Built-in commands 


Commands that are part of an operating system. They are always quicker than 
transient commands because they are not accessed from disc. 


А group of connections either within the computer, ог connecting it to the outside 
world that carries information on the state of the CPU, the RAM and other hardware 
features. The CPC664 bus is presented on the circuit board connector marked 
EXPANSION, at the rear ofthe computer. * 


Byte 


А group of eight bits, which forms the smallest portion of memory that an 8-bit CPU 
can recall from, or store in memory. 


CAD 


Computer Aided Design. Usually an interaction of computing power and graphics to 
provide an electronic drawing board, although any calculation performed on a 
computer in pursuance of a ‘design’ comes under the heading of CAD. 


CAE 


Computer Aided Education. Further nourishment for the buzzphrases of computing. 
The use of the computer to help with education. CAI (Computer Aided Instruction) 
and CAL (Computer Aided Learning) are two aspects of CAE. 


Cartridge 


A specially packaged memory integrated circuit containing software which can be 
plugged directly into a socket specifically provided for the purpose on the computer. 
Cartridge software loads and runs quickly and easily, but costs considerably more 
than software supplied оп disc. 


Cassette 


Apart from the obvious recording tape variety, a generic term that encompasses a 
variety of ‘packages’ - including ROM software etc. 
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ССР 

Console Command Processor. This is a module of CP/M that interprets and executes 
user input from the keyboard. Usually commands are input which the CCP loads and 
executes. 

Character 

Any symbol that can be represented in a computer and displayed by it, including 
letters, numbers and graphics symbols. 

Characterset 

All the letters, numbers and symbols available on a computer or printer. The fact that 
acharacter exists оп a computer does not imply it is accessible on any printer. 
Character string 


A piece of «variable: data comprising a sequence of characters that can be stored or 
manipulated as a single unit, e.g. a word or a collection of words. 


Chip 

A misleading but popular reference to any form of monolithic electronic integrated 
circuit. The 'chip' is actually a small slice of specially processed silicon material, on 
which the circuit is fabricated. 

Clock 

The reference timing system in the computer used to synchronise and schedule the 
operations of the computer. А real time clock is one that maintains the hour, date etc. 
Code 

Apart from the more literal implications, frequently used by programmers as an 
abbreviation of ‘machine code’. 

Cold start 

The process of booting and initialising an operating system. A cold start of CP/M is 
performed when the | СРМ command is used. 


Command 
A programming instruction. 
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Compiler 


А complex program that converts complete programs written іп a high level 
interpretive languages like BASIC into the direct instruction code of the 
microprocessor, thereby enabling operation at much greater speeds. 


Computer generations 


Technological landmarks have delineated several distinct steps in computer 
technology, and the groupings within these various strata are known as the 
'generations' of design technologies. 


Computerliteracy 
Another grandiose expression meaning understanding computers. 


Console mode 


CP/M direct mode; the А> appears on the screen, and the system awaits input of a 
CP/Mor utility command. 


Corruption 

The destruction or alteration of the contents of a disc file or memory, in an 
undesirable and potentially unrecoverable manner. 

CP/M 

Control Program for Microcomputers. A disc based operating system by Digital 


Research that provides a standard systems interface to software written for a wide 
range of microprocessor based computer systems. 


CPU 

Central Processing Unit. The component at the heart of any computer system that 
interprets instructions to the computer and causes them to be obeyed, in a 
microcomputer, the CPU is the microprocessor device itself. 

Cursor 

A movable marker, indicating where the next character is to appear on the screen. 
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Cursor control keys 

Keys that move the Cursor around the screen, and are frequently used to control the 
direction of action in arcade games, indicated by arrows printed on the top. 
Daisy-wheel printer 

A printer that can produce high quality or ‘typewriter quality’ documents. Printed 
characters are created by the impact of letters against the ink or film ribbon. 
Database 

Anarray of any type of data ina variety of computer addressable formats. 


Data capture 
The term which describes the collection of data from any outside sources that are 
linked in some way to a central computer. 


Debugging 

The process of fixing the bugs in a program by a combination of ‘suck it and see’ and 
more scientific methods. 

Decimal notation 

Also known as the Denary system, for numbers with base 10, using the digits 0 to 9, 
representing numbers of units, tens, hundreds, thousands and soon. 

Default 


The value assumed in the absence of any user output. For example, when CP/M is 
started Drive A : is assumed to be the default drive. 


Delimiter 
(See Separator) 


Diagnostic 


A message automatically produced by a computer to indicate and identify an error in 
a program. 


Digital 


Describes the transition of a changing quantity in terms of discrete steps rather than 
by acontinuous process. The opposite of analogue. 


Digitiser 
А means of plotting analogue information into a computer. Commonly referred to in 
conjunction with graphics tablets. 


Directory 

A section of disc containing entries for each file on the disc. A list of the contents of a 
disc. 

Disc (or disk) 


A flat, thin circular piece of plastic, coated on one or both sides with a magnetic oxide 
surface and used as a medium for storing data. The disk is housed in a protective 
envelope, with access for the reading head provided by a ‘window’. On a 3" disc the 
window is covered by a metallic shutter, which automatically slides across when the 
disc is out ofthe disc drive. 


Disc drive 
The mechanisms used to spin and access the data on the surface ofthe disc. 


Documentation 


The manuals that are supplied with computers or software to explain how they are 
operated. 


DOS 
Disc Operating System. The software that controls all the operations of a disc drive. 


Dot matrix 


A rectangular grid of dots on which a character can be displayed by the selection of 
certain dots. 


Double sided 


A disc that can store information on both sides. A double sided disc drive can access 
both sides of a disc without the need to change the disc over. 
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Download 

Тһе transfer of information from one computer to another - the computer receiving 
the data is generally referred to as the machine downloading. The other end of the 
link isuploading. 

Dr.LOGO 

Digital Research's version of LOGO, a programming language with a graphics turtle. 


Dumb terminal 


А computer terminal that simply acts as a medium for input and output without any 
processing of the information passing through. Note that a mindless terminal is one 
where even the display drive electronics are absent, and that the screen display 
information is fed in as pure video. 


Edit 
Tocorrect or make changes to data, a program or text. 


A program that is usually in the ROM of the computer, which enables the editing 
process to be carried out. 


EPROM 


Erasable Programmable Read only Memory. Similar to the PROM, except that the 
data contained in the chip can be erased by ultra-violet light, and new program 
recorded. An EEPROM is similar, except that it may be electronically erased. 


Expression 


A simple or complex formula used within a program to perform a calculation on data 
-the expression will usually define the nature of the data it can handle. In Dr.Logo an 
expression consists of a procedure name followed by any necessary inputs to the 
procedure, 


Fifth generation computers 


Mainly large mainframe computers that are promised to arrive with the ability for 
-self-programming using the developments of artificial intelligence. 
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File 
А collection of data, generally stored on cassette or disc. 


Filename 

The name of a file. Іп Dr.Logo a file name can consist of up to 8 alphabetic or numeric 
characters. In CP/M an additional three character file type, preceded by a dot . is 
allowed. 

Firmware 


Software contained in ROM - a cross between pure software and pure hardware. 


Fixed-point number 

А number represented, manipulated and stored with the decimal point in a fixed 
specified position. 

Floating-point number 

A Real number, manipulated and stored with its decimal point permitted to settle in 
the required position. The method is particularly useful when dealing with large 
numbers. 

Floppy disc 

(See Disc) 


Flowchart 

А diagrammatic representation of the progression of program steps and logical 
processes tracing the sequence of events during program execution. 

Forth 

А high speed programming language, with speed and complexity falling between a 
High-level language and Machine code. Not a beginners' language. 


Function key 


А key on the keyboard that has been assigned a specific task - which it may execute in 
addition to, or instead ofthe main purpose inscribed upon that key. 
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Gate 


Logical gates permit the passage of data when certain conditions are fulfilled. There 
аге many different types of gate (OR, AND, XOR etc). 


Graphics 
The part of the screen display of the computer that is not related to the display of 
‘characters’. Graphics encompasses the drawing and plotting of lines, circles, 
patterns, etc. 


Graphics character 
А вһаре ог pattern specially designed to be useful in creating images. 


Graphics cursor 


Similar to the text cursor, but addressing the graphics screen. An invisible concept on 
the CPC664 - but nevertheless an indispensible facility for locating drawn graphics. 
Not to be confused with graphics characters which are still part of the ‘character set’, 
andare printed at the text cursor. 


Graphics mode 

Early microcomputers required to be specifically set to either handle characters or 
graphics. Modern personal computers are сераЫе of mingling text and graphics 
simultaneously. 

Graphics tablet 


A device that plots the co-ordinate points of a given picture or drawing for 
manipulation within the computer. A form of A/D. 


Handshaking 
A sequence of electronic signals which initiates, checks and synchronises the 
exchange of data between a computer and a peripheral, or between two computers. 


Hard Copy 


Paper print-out of a program or other text - or of a graphics display. The transitory 
screen equivalent is known as ‘soft copy’. 
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Hardware 


Тһе electronic and mechanical parts of a computer system - anything that isn't 
software or firmware. 


Hexadecimal(or HEX) 


“The number system with base 16. Hexadecimal numbers are signified in CPC664 
programming by the prefix & or &H. e.g. &FF = (decimal) 255. (See part 1 of the 
chapter entitled ‘At your leisure....’.) 


Hex file 
An ASCII representation of a command or machine code file. 


High-level language 


Languages like BASIC, which are written in ‘near literal’ form, where the actual 
language does most of the work of interpreting. Slower than machine code orientated 
programs, but far simpler to understand. 


IEEE-488 


One of the standard Interfaces for connecting devices to a microcomputer. Similar to 
- but not wholly compatible with - the Centronics parallel interface. 


Information technology 


Anything relating to the use of electronics in the processing of information and 
communications: wordprocessing, data communications, PRESTEL, etc. 


Initialise 


Switch on a system, or declare specific values for variables before beginning to 
execute the body of program - e.g. dimensioning arrays, declaring variables to be 
integers, etc. 


Input 
Anything that enters the computer memory from its keyboard, disc unit, serial 
interface or other input source. 


Instruction 


А request/command to a computer to perform a particular operation. A collection or 
sequence of instructions form a program. 
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Instruction set 


The prime logical and mathematical processes carried out by the microprocessor. 
Every high level instruction (including assembler mnemonics) have to be capable of 
being distilled down to an instruction that is recognised by the computer CPU. A 
single high level command may invoke a large number of elements from the CPU's 
instruction set. 


Integer 
A whole number with no decimal point. 


Integer number 


А number with no fractional part, i.e. a number with no part to the right of the 
decimal point - as opposed to a real number which is the integer part plus the 
fractional part. 


Integrated circuit 


A collection of electronic circuit components miniaturised and built onto a single 
pieceofsilicon. (See also Chip) 


Intelligent terminal 


A terminal where as well as handling the requirements of the computer's input and 
output, local processing power is also available when the terminal is ‘off line’. 


Interactive 


Usually a reference to programs where the hardware computer prompts the user to 
provide various types of input - ranging from controlling the spaceship in an arcade 
game, to answering questions in educational programs. The action of the user has an 
effect in ‘real time’ on the behaviour of the program. 


Interface 


The way in and out of a computer, both in electrical and human terms. The CPC664 
interface is the keyboard (input), and the screen (output) - as well as the facility for 
the connection of user peripherals to the various sockets. 


Interpreter 


A further extension of the analogy of computer instruction sets and language. The 
element of the system software that interprets the high level language to the level 
that can be understood by the CPU. e.g It converts BASIC code as entered via the 
keyboard into the computer's own internal language. 


vo 
Input/Output. 


Iteration 


One of the elements of computing. The computer performs all tasks by breaking them 
down into the simple tasks that can be handled by the CPU. To do this, the computer 
must go to and fro’ between many simple elements until a given condition is fulfilled. 


Joystick 


An input device that generally replaces the function of the cursor keys, and makes 
games playing faster and easier. 
K 


A short form of the metric measure prefix for 1000, ‘kilo’ - which in computing has 
come to be widely used to refer to a ‘kilobyte’ - which is actually 1024 (decimal) in 
view of the binary association of 2 raised to the power of 10. 


Keyboard 


The matrix of alphanumeric key switches, arranged to provide the means of typing 
commands and other information into the computer. 


Keyword 
A word whose use in the computer program or language is reserved for a specific 
function or command. 


Least significant bit 


In a binary number, the Least Significant Bit (LSB) is the bit at the extreme right 
hand end of the expression. 
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Light Pen 
Another alternative input method, using a pen or ‘wand’. 


Line number 


BASIC and some other languages use programs that are arranged in line number 
order. 


Lisp 


The acronym formed from LISt Processor language. Another high level computer 
language. 


Logic 


The electronic components that carry out the elementary logical operations and 
functions, from which every operation of a computer is ultimately built up. 


Logical device 


The representation of a device that may be different to its physical form. For example 
the CP/M logical device LST may be assigned to the Centronics port or perhaps the 
VDU. 


LOGO 

The name of a programming language derived from the Greek word logos, which 
means word. Logo is designed to teach the fundamentals of computer programming, 
Loop 

A process in a program that is executed repeatedly by the computer until a certain 
condition is satisfied. 

Low-level language 

Such as ‘assembly language’. A programming language in which each instruction 
corresponds to the computer's machine code instruction. 

151 


Large Scale Integration. The development of integrated circuits, packing more 
functions onto ever smaller pieces of silicon. 


Machine Code 


Тһе programming language that is directly understood by a microprocessor, since all 
itscommands arerepresented by patternsof binary digits. 


Machine readable 


А medium of data or any other information that can be immediately input to а 
computer without additional work on keyboarding etc. 


Man-machine interface 


А point of interaction between the computer and the operator: keyboard, screen, 
sound еіс. 


Matrix 


The arrangement of the dots that form the character cell on the screen, or on the print 
head of a ‘dot matrix’ printer. Also a term used in mathematics and computer science 
to encompass arrays. 


Memory 


The computer's parking lot for information and data, neatly arranged in logical rows 
with each item individually accessible. Either known as RAM (random access 
memory) where information can be both stored and retrieved, or ROM, where the 
information may be read, but not re-written in another form. Discs and tape are 
examples of 'bulk memory', although the term has evolved to mean the memory that 
isdirectly addressed by the CPU. 


Memory map 


The layout of the memory, showing the various addresses, and the allocation of the 
memory to specific functions, such as the screen, the disc operating system etc. 


A bill of fare of the different options that may be carried out by the program in the 
computer, left to the user to select. 


Microprocessor 


Ап integrated circuit that sits at the heart of а microcomputer and executes the 
instructions that are presented to it by the BASIC intepreter, in order to control the 
various output devices and options. 
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Modem 

А MOdulator DEModulator that connects the computer's I/O to a telephone line or 
other serial data transmission medium - including fibre optics. (See also Acoustic 
coupler) 

Monitor 


The screen section of a computer terminal system, and also a term describing a 
machine language program that provides access to the fundamental machine 
operation of the computer. 

Mouse 

An upside-down ‘tracker’ or ‘roller ball’. Pushed around a table top by hand, a mouse 
is generally used to move a cursor around the screen. Originally designed to 
overcome the fear of keyboards and make software appear more ‘user friendly’. 

MSB 

The Most Significant Bit of a binary number, i.e. the bit at the left end of the binary 
expression. 

Network 

When two or more computers are linked together to exchange data and information 
- either by wiring, or via MODEMs. 

Nibble 

Half a byte: a four bit expression. Each of the hexadecimal digits in the expression 
&F6 represents ‘one nibble’. 

Node 

A unit of storage in the LOGO workspace. Typically one node consumes 4 bytes of 
memory space. 

Noise 


The CPC664 sound facilities include the ability to inject a variable amount of random 
noise to create effects such as explosions. 


Numeric keypad 


Тһе area on the keyboard where number keys are grouped to facilitate entry of 
numeric data, and in the case of the CPC664, to provide the additional facility of user 
definable function keys. 


OCR 


Optical Character Recognition. A means of reading printed or written characters 
with an optical reader and translating them directly into computer readable data. 


Octal 


А number system to the base of 8, where each digit (0-7) is constructed from three 
Bits. 


Offline 


A computer peripheral - usually a display terminal or a printer - that is not actively 
connected to, or accessible by, the main processing unit. 


Online 
The opposite of Offline. 


Operating system 


The attendant in the ‘parking lot’ referred to under the entry for Memory. Software 
that allocates precedence and timing to the operations of the computer. 


Output 


Anything that comes from a computer as the result of some computational function. 


Operator 


The part of arithmetic expression that causes one number to operate on another, e.g. 
+ - * / etc. 


Overwrite 
Erase an area of memory by replacing its contents with new data. 
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Paddle 
Analternative name for a joystick. Also referred to as a ‘games paddle’. 


Pagezero 


This refers to the region of memory in a CP/M environment between &0000 and 
&0100 which is used to hold vital system parameters. 


Paperware 


Another description for the printed ‘hardcopy’ of computing. Occasionally computers 
launched before they have actually finished development are described as a 
‘paperware exercise’. 


Parallel interface 


The CPC664 printer interface supports a parallel printer: which means that each 
data line from the bus is connected to a corresponding input on the printer. Data is 
transferred many times more quickly using a parallel interface than it is through a 
serial interface, since the serial interface must first format each byte, and frame it 
with synchronisation information. 


Pascal 

A high-level structured programming language that must be compiled before it will 
execute - and therefore runs very quickly. Generally the next language that the keen 
BASIC student will pursue. 

PEEK 

The BASIC function that looks directly into the computer’s memory, and reports the 
value at the specified location. 

Peripheral 

Printers, modems, joysticks, cassette units - anything that plugs into the computer to 
expand its capabilities. 

Physical device 


An actual device, consisting of hardware, that exists. Physical devices may be 
represented by logical devices. 


Pixel 
The smallest accessible area ofthe screen that can be controlled by the hardware. 


Plotter 


A specific type of printer that draws 'longhand' using pens rather than an impact 
print head, Used for technical and graphical drawing output. 


POKE i 
The statement in BASIC that is used to place a value in a specified memory location. 


Port 
A specifically addressable point on the interface for input or output of data. 


Portability 

Other than the literal use, means the ability for software to operate on different 
makes of computer - usually as a result of a compatible operating system, such as 
Digital Research’s CP/M. 

Primitives 

Procedures, operations ог commands that make up Dr.Logo; the built-in procedures. 


Printer 
Any hardcopy method for printing out text. 


Procedure 


A series of expressions or program statements that dictate how to perform a 
particular task. 


Program 

A combination of instructions that cause the computer to execute a task. It can be 
anything from a simple machine code ‘routine’ to a complete applications program, 
such as a wordprocessor. 
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Programminglanguage 

The medium through which the program is written, being comprised of rigid rules on 
the use of words, numbers and the sequence in which they are implemented. - 
PROM 

Programmable Read Only Memory. An integrated memory circuit that once written 
with data, cannot be erased. (See also EPROM) 

Prompt 

A short message or character sequence reminding the user that some type of input is 
expected. For example, the CP/M prompt is the > and the Dr.Logo prompt is the ? 
character. 

PSU 

Power Supply Unit. The means of converting the domestic mains electricity supply 
intothe necessary voltages to operate the computer (and peripheral devices). 
QWERTY keyboard 

The colloquial term to describe a keyboard with the conventional UK or US 
typewriter key layout. 

RAM 

Random Access Memory. Memory that may be both read from, and written to, using 
the internal circuitry of the computer during the normal course of program 
execution. 

Random access 


The ability to read and write information in memory or on a disc in any desired order. 


Random number 


А number that is generated by the computer program that is neither repeatable, not 
predictable. The CPC664 is capable of generating a pseudo random number 
sequence. 
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Raster 


А system of “writing' on the screen where the images are built from a number of 
horizontal scan lines. (Raster scan). 


Readonly R/O 


An attribute assigned to a disc, a disc file or a disc drive that prevents writing or 
changing of data. 


Read write R/W 

An attribute assigned to a disc, a disc file or a disc drive that allows both reading and 
writing of data. 

Real number 

A number that has both integer and fractional parts. i.e. both sides of the decimal 
point are used. 

Realtime 

Events that occur before your eyes, as opposed to those which only become evident 
after the termination of the process that produced them. 


Record 
A group of bytes in а file. CP/M uses 128 byte records. 


Recursion 


The series of repeated steps (also sometimes imprecisely described as reciprocation) 
within a program or routine in which the result of each repeated cycle of events is 
related to the previous one. 


Refresh 
To update information, either on the screen ofa VDU, or in the memory. Need not bea 


destructive process, but merely reinforcing whatever was already present in memory 
oron the screen. 


Register 


Atransient memory location within the CPU that is used for temporary storage. 
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Remark 

A non-executing statement in a program that is included to remind the programmer 
what part of the program he is doing, and to date and time stamp that particular 
‘edition’. 

Reserved word 

A word which has particular significance to the computer program, and cannot be 
used other than in its pre-defined context. For example, BASIC will not accept the 
word NEW asa variable - it is already ‘reserved’ for another purpose. ' 
Resolution 

Тһе ability to determine where one element of the display ends, and the next one 
begins. Also loosely applied to the ability of a computer to perform arithmetic 
manipulations on large numbers. 

Reverse Polish notation 


(RPN) A method of describing arithmetic operations favoured by some calculator 
manufacturers, where the operators (+, -, ж, /) are placed behind the values to which 
they apply. 


RF Modulator 
The means by which the video signals from the computer are encoded and 
‘transmitted’ to the aerial ofa standard TV set. 


ROM 


Read Only Memory. Generally with reference to semiconductor memory systems: 
once written, neither erasable, nor re-writable. 


Routine 


A part of the program that performs a ‘routine’ task. A ‘sub’ program that resides 
either within a main program, or may exist as a separate module for incorporation 
into a variety of applications programs. e.g. A program to derive a 12 hour display 
from the system’s clock may be considered ав а routine. 


Glossary Appendix 2 


RS232C 


A specific standard for serial data communications interfaces. Devices at both ends of 
the data link using an RS232 interface require to be ‘configured’ to the particular 
conditions of the RS232 data standard used. Compare this with the Centronics 
parallel interface where the interconnection is virtually standard everywhere. 


Screen Editor 
А text or program editor where the cursor may be taken to any part of the screen 
display in order to alter the characters appearing there. 


Scrolling 

The term describing the way in which the screen display ‘rolls up’ when the display 
fills up to the bottom, and needs to make space for the next line of entry or output to 
appear. 

Sector 

A block of data on a disc. The AMSTRAD disc system uses a sector size of 512 bytes. 


Separator 
A separator performs the same function as a delimiter, i.e. marking the boundary 
between reserved words and other elements of the program or data. 


Serial interface 


Although this term nearly always refers to an RS232 interface, other serial 
standards exist for the sequential transmission of computer data. 


Simulation 


A technique for emulation of real life interactive processes using the computer, such 
as flight simulation, driving simulation etc. 


Single sided 
Refers to a disc which has only one side available for data storage. 


Soft key 
(See UDK - user defined key) 
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Software 
Programs themselves. Мау be based on disc, cassette, ROM, etc. 


Software engineering 


А grandiose expression meaning computer programming, implying a structured and 
considered approach, as opposed to arbitrary techniques. 


Sound generator 


The part of a computer (it may be either hardware or software) that creates the sound 
and noise. 


Speech recognition 


The conversion ofthe spoken word into machine readable instructions. 


Speech synthesis 


Generation of simulated speech using a combination of hardware and software. 


Spreadsheet 

A program that allows rows and columns of numbers to be entered and arithmetically 
manipulated. Changing one entry causes all the associated calculations to be re-run, 
and produces an updated result. 

Sprite 

А screen character that moves freely around the display, generated by specific 
hardware or software that allows it to appear and disappear apparently at random. 
Stack 

An area of memory allocated for ‘stacking’ information, but where only the last entry 
on the stack can be recalled. 

Statement 

An instruction, or sequence of instructions, іп a computer program. 


Stream 

The route used for the output from the computer. e.g. the screen, the printer, or the 
disc. 

String 


A type of data comprising an assortment of characters that may not be treated as a 
numeric variable. It may be purely numeric, but it is not treated as such unless 
specifically converted to a corresponding numeric variable by the appropriate 
command. 


Structured programming 
A logical and premeditated programming technique that results in programs that. 


flow from 'topto bottom', with clearly described steps. 
Sub-routine 
(See routine) 


Syntax error 

When the rules of the program are broken by the incorrect use of keywords and 
variables, BASIC will prompt the user with this message. 

System tracks 

Tracks reserved on the disc for the CP/M system. 


Terminal 

А keyboard input device, with either а VDU screen or teletype typewriter output 
system. 

ТРА 

Transient Program Area. Ап area in memory commencing at &0100 where CP/M 
user programsrun and store data. 

Track 


Tracks are concentric rings on a disc. Each track holds a fixed number of sectors. The 
tracks and sectors are written to a specific area of a disc during formatting. 
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Transient program 

A CPM utility program such as FILECOPY, which can be loaded into the ТРА and 
run by typing its name at the keyboard. 

Truncated 


A number or string that has been shortened by removal of leading or trailing 
characters. Where intentional, the process may involve rounding the value. Where 
unintentional, the extra characters are simply discarded to enable the number or 
string to fit the available space. 


Truthtable 


The results of a logical operation are either ‘true’ or ‘false’. The computer interprets 
these as being either 1 or 0, and the truth table lists the possible results of a logical 
operation (1 Р А> B THEN C)accordingly. 


Turnkey 

A word used to describe a program which executes automatically when the system is 
booted. The Dr, Logo disc is an example of a turnkey program. 

Turtle 

A graphic symbol, in the shape of an arrow head, that functions as a graphic cursor on 
the Dr.Logo graphic screen. 

Turtle graphics 

The graphics image left on the screen by the movement of a turtle. As the turtle 
moves it leaves а trace of its path on the screen. 


Turtle step 
The smallest distance a turtle can move. Normally one pixel. 


UDK 

User defined keys. The CPC664 has up to 32 keys which may be redefined to perform 
a variety of tasks. 

Unsigned number 

A number with no prefix to signify whether its value is positive or negative. 
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Utility 


Any complete program used to perform a common operation, such as sorting data or 
copying files. 


Utility program 


А program on disc that enables the user to perform certain operations. (See Transient. 
program) 


Variable 

Ап item included in a computer program that сап be identified by name, but whose 
actual value may be madetto vary during the execution ofa program. 

Warm start 

This is performed when [CTRLIC is pressed during CP/M. A warm start reinitialises 
the disc sub-system and returns control to CP/M ready for commands to be entered. 


Wildcard character 


Either of the characters * or ?. Dr.Logo only supports the ? character. The * 
wildcard character simply means any number of ?s. When referencing files wildcard 
characters are used to make up an ambiguous file name. Any ?s in the file name refer 
toany alphabetic or numeric character. 


Write protection 


A safeguard used to prevent re-writing of a disc or disc file. A write protected disc or 
file is Read Only. 


XYZY 


A magic word to get out of sticky corners in adventure games. 
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Telly tennis 


Тһе опе that started it all, but still great fun! For two players, or опе player against 
the computer. Keyboard or Joystickis). 


'TELLY TENNIS by DAVID RADISIC 
'copyright (c) AMSOFT 1985 
1 


DEFINT a-z 
comp=1 
ЕМУ 1,-11,20,-9,5000 


MODE T:INK Ø,1Ø:BORDER 10:INK 1,26:INK 2,18:INK 3,0 
60508 710 

60508 150 

GOSUB 330 

GOSUB 420 

LOCATE 13,1:PRINT USING"#### ";scorel; 

LOCATE 35,1:PRINT USING"#### ";score2; 

GOTO 100 

PEN 2 

x(1)=3:y(1)=5 

х(2)=37:у(2)=22 
edge$=CHR$(233):edge2$=STRING$(2,207) 

LOCATE 1,3:PRINT STRING$(39,edge$):PRINT STRING$(39 
í,edge$) 

FOR 1=1 TO 19 

PRINT edge2$;TAB(38);edge2$ 

NEXT 

PRINT STRINGS(39,edge$):PRINT STRING$(39,edge$); 
WINDOW 81,3,37,5,23 

CLS#1 

SYMBOL 240,0,60,126,126,126,126,60,0 

bat$= +CHR$(8)+CHR$(10)+" 1" 

сіг5- *CHRSCB) *CHRSCTB) +" " 

ball$=CHR$(240) 

PEN 3 

LOCATE 2,1:PRINT"Player 1 : В"; :LOCATE,24,1:PRIN 
T"Player 2 : 2"; 

RETURN 
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330 
340 
350 
360 
370 
380 
399 
400 
418 
420 
430 
440 
450 
468 
470 
480 
490 
500 
518 
520 
530 


548 
558 
568 
578 
580 
590 
600 


618 
620 


630 
640 
650 
660 


670 
680 
698 
700 
710 


nzINT(RND*2):CLS #1:scored=B 

PEN 3 

FOR iz1 TO 2:LOCATE x(i),yCiD:PRINT bat$;:NEXT 
ON n GOTO 390 

xb=21:dx=1 

GOTO 400 

idx=-1 

Y=INT(RND*3)-1 


60508 600 

oxb=xb:oyb=yb 

60508 500 

IF note>@ THEN SOUND 129,note,50,15,1 
LOCATE oxb,oyb:PRINT" "; 

LOCATE xb,yb:PRINT ball$ 

IF scored-Ü THEN 428 


RETURN 

LOCATE xb+dx,yb+dy:ch$=COPYCHRS(#@) 
note=0 

IF ch " THEN xb=xbtdx:yb=yb+dy: RETURN 


IF ch$= 
RETURN 
IF ch$-LEFT$(edge2$,1) THEN 570 

IF ch$=edge$ THEN dy=2-dy-2:note=250 

RETURN 

IF dx>@ THEN ѕсоге1=5соге1+1 ELSE score2=score2+1 
scored=1:note=2000 

RETURN 

p(1)=CINKEY (69) 2 20) + CINKEY(72)>=8) +ABS( CINKEY(71)>= 
0) + (ІМКЕҮ(73)>=0) )*2 

IF comp=1 THEN р(2) =АВЅ(у(2) «yb)*2*(y(2)»yb) :GOTO 6 
30 
p(2)=(INKEY(&)>=Ü)+(INKEY(&8)>=0)+ABS((INKEY(5)>=0) 
+(INKEY(49)>=0@))*2 

PEN 3 

FOR 1=1 TO 2 

Ci), ,y(i)+p(i):ch$=COPYCHR$(#0) 

" THEN LOCATE x(i),yCi):PRINT clr$;:y(i)=y 
(Gi) *ROUND(CoCID /2) 

LOCATE x(i),y(i):PRINT bat$; 

NEXT 

PEN 1 

RETURN 

PEN 2 


I" THEN dx=2-dx 


:dyzINT(RND*3)-1:notez200: 


RINT:PRINT TAB(15)"Ping-Pong":PRINT TAB(15)" 
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720 PEN 3:PRINT:PRINT TAB(14)"To move bats : 
730 PRINT:PRINT:PEN 1 
748 PRINT" Player 1 Player 2 Direction":PRI 
NT 
750 PRINT" A 6 up" 
760 PRINT" 1 3 DOWN": PRINT 
770 PEN 3:PRINT:PRINT ТАВ(14) "Ог joysticks” 
780 PRINT:PRINT:PRINT: PRINT 
790 PEN 2 
800 PRINT TAB(6)"Select <1> or «2» players" 
810 iS-INKEYS:IF i$<>"1" AND i$«»"2" THEN 810. 
820 IF i$z"1" THEN comp=1 ELSE сотр=@ 
830 MODE 1:RETURN 
Electric fencing 


Try to ‘foil’ your opponent! For two players only. Keyboard or Joysticks. 


10 
20 
30 
48 


*ELECTRIC FENCING by ALEXANDER MARTIN 
‘copyright (c) AMSOFT 1985 
, 


DEFINT а-2 
MODE 0 
60508 980 
GOSUB 1370 
60508 278 
GOSUB 1520 
GOSUB 1370 
GOSUB 1270 


REM start 

IF finished THEN GOTO 100 

GOSUB 248 

FRAME:IF р141г THEN 60508 570 ELSE FRAME:FRAME 
FRAME:IF p2dir THEN 60508 628 ELSE FRAME:FRAME 
1 THEN GOSUB 670 

1 THEN GOSUB 720 
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240 IF j THEN 580 ELSE 488 


258 

260 ' 

270 CLS:PEN 6 

280 PRINT:PRINT" CHOOSE CONTROL" 


290 PRINT:PRINT:PRINT:;PRINT"press J/K then ENTER" 
300 LOCATE 4,10:PRINT"JOYSTICK";TAB(5);"OR KEYS" 
310 LOCATE 12,10:IF j THEN PRINT"*":ELSE PRINT" 
320 LOCATE 12,11:1F j THEN PRINT" ":ELSE PRINT" 
330 IF NOTCINKEY(45)) THEN 1 

340 IF NOTCINKEY(37)) THEN 
350 IF NOTCINKEY(18)) THEN RETURN ELSE 310 


370 ' 
380 р1-/0Ү(0):р2-20Ү(1) 
i AND 1)*-1*(p1 AND 2)*0.5 

AND 1)*-1+(р2 AND 2)*0.5 

410 IF P1 AND 16 THEN р15а-р15а-1:1Ғ р1ѕа=-1 THEN AFTER 
15 60508 778 

420 IF P2 AND 16 THEN р2за=р2за-1:1Е p2sa=-1 THEN AFTER 
15 GOSUB 770 

430 IF pisa THEN pldir=0 

440 IF p2sa THEN р29іг=@ 

450 RETURN 


470 ' 

480 p2dirz(CINKEYC422 200 * D) &CCINKEYCS) 200 *-1) 

490 pidirzCCINKEYCÓ9) =0) *1) + CCINKEYC2 12200 *-1) 

500 IF INKEY(63)=@0 THEN р1за=р1за-1:1Е pis 1 THEN AFT 
ER 15 60508 770 

510 IF ІМКЕҮС10) =0 THEN p2sa=p2sa-1:1F р2за=-1 THEN AFT 
ER 15 GOSUB 770 

520 IF pisa THEN pldir=Ü0 

530 IF p2sa THEN p2dir=0 

540 RETURN 
` 


560 ' 

570 pt-piwp*pidir:IF pt>25 OR pt<6 THEN RETURN ELSE piw 
p=pt 

580 pldir=0 

590 PEN 1:LOCATE 3,plwp:CLS #3:PRINT CHRS(209);:RETURN 


640 ' 
620 pt-p2up*p2dir:IF pt>25 OR рї<6 THEN RETURN ELSE p2w 
p=pt 
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630 
640 
658 
660 
678 


680 
690 
700 
718 
720 


730 
740 
750 
760 
770 


780 


798 
800 
810 
820 
830 
840 
850 
860 
870 
880 


898 
900 
910 
920 
938 
940 
950 
968 
970 


р24іг-й 
PEN 2:LOCATE 18,p2wp:CLS #S:PRINT CHR$(211);:RETURN 


PAPER #4,4:WINDOW #¿,&,17,plup,plwp:CLS#&:FRAME:FRA 
МЕ 

PAPER #4,0:CLSH4 

GOTO 578 

' 


PAPER #6,5:WINDOW #6 ,4, 17 „р2ир,р2ир: С1$#6 : ЕВАМЕ : ЕКА 
МЕ 

PAPER #6,0:CLS#6 

GOTO 620 


pwpe=(ptwp=p2wp):IF pisa AND NOT(p2sa) AND pwpe THE 
N pisczpisc*1:S0UND 132,120,10,0,1,0:PRINT/1,aS(p1s 
c);:IF pisc=9 THEN 860 

IF p2sa AND МОТ(р15а) AND pwpe THEN р25с=р25с+1:500 
ND 132,100,10,0,1,0:PRINT4/2,aS(p2sc);:1F p2sc-9 THE 
N 860 

IF pisa THEN SOUND 132,40,70,0,1,1 

IF p2sa THEN SOUND 132,56,70,0,1,1 

р1ѕа=0 

р25а-0 

RETURN 


PEN 6 

LOCATE 6,10:PRINT"GAME OVER" 

IF pisc=9 THEN INK 1,2,20:1NK 2,0 ELSE INK 2,6,17:1 
NK 1,8 

SOUND 129,1000,0,12,3:S0UND 130,900,0,12,3 
WHILE INKEY$«» WEND 

t!zTIME:WHILE 2088»TIME:WEND 

WHILE INKEYS= END 

CLS 

finished--1 

RETURN 
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988 а5(0) 
998 as(1) 


1000 
1010 
1020 
1030 
1040 
1050 
1060 
1070 
1080 
1090 
1100 
1110 


1120 
1130 
1140 
1150 
1160 
1170 
1180 
1190 
1200 
1218 
1220 
1238 


1240 
1250 
1260 
1270 


1280 
1290 


1300 


1318 
1320 
1330 
1340 
1350 
1368 
1378 


Appendix 3 


11101101101111" 
01001081001001" 
111001111100111" 
111001111001111" 
100100101111001" 
111100111001111" 
111100111101111" 
111001001010010" 
111181111101111" 
111101111001001" 
TO 9 
howlong=LEN(a$(n)) 
FOR n2=1 TO howlong 
ІР MID$Ca$(n),n2,1)=" 
143)ELSE MIDS(aS(n),n2,1) CHR$(32) 
NEXT n2,n 


а5(2 


ELECTRIC FENCING" 
HR$(32)+CHR$(164)+" Alexander Martin" 
ENV 1,-9,2000:ENT -1,6,3,1 


ENV 2,127,0,0,127,0,0,127,0,0,127,0,0,127,0,0 


ENV 3,-9,9008 


BORDER @ 


INK 0,12:РЕМ #4,1:РЕМ #6,2:РЕМ #1,1:РЕМ #2,2:PAPER 


#1,3:PAPER #2,3:PEN 40,6 
RETURN 'FROM SETTING UP CONSTANTS 


INK 0,12:INK 1,2:INK 2,6:INK 3,13:1NK 4,20:INK 5,1 


7:1NK 6,20 
WINDOW #3,3,3,6,25:WINDOW 85,18,18,6,25 


WINDOW 451,3,5,1,5:WINDOW 42,16,18,1,5:WINDOM 47,1, 


20,1,5:PAPER 47,3 
CLS:CLS#7:PRINT#1,a$ (Ø) 
ipiwp p2wp=24:pidi 
GOSUB 570:60508 620 
SOUND 1,1080,0,12,2:SOUND 2,900,0,12,2 
p1sa=O:p2sa=0:finished=8 

RETURN ‘FROM GAME SHEET RESTORE 


sp2dir=1 


CLs 
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:PRINT42,a$(0); :p1sc-Ü:p?2s 
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1380 PEN 7 

1390 FOR n=1 TO LEN(b$) 

1400 LOCATE 2+n,10 

1418 FOR n2-LEN(b$) TO n STEP-1 
1420 PRINT MIDS(bS,n2,1) 

1438 LOCATE 2*n,18 

1448 SOUND 135,20*n2,5,12,2,1 
1450 NEXT n2,n 

1460 SOUND 135,100,0,13,5,1,20 
1470 PEN 6:PRINT:PRINT:PRINT:PRINT c$ 
1480 FOR п=1 TO 5000:МЕХТ 

1498 RETURN 

1500 ' 

1540 ' 

1520 IF j THEN RETURN 

1530 CLS 

1540 LOCATE 7,5 

1550 PRINT"CONTROLS" 


1560 PRINT 
1578 PRINT" PLAYERI PLAYER2" 
1580 PRINT 
1590 PRINT" А up 6" 
1600 PRINT" 7 down 3" 
1610 PRINT" X fire 45 


1620 t!=TIME:WHILE 1!+1000>ТІМЕ: МЕМО 
1630 RETURN 


Pontoon 


Bringsout the gambler in you! For one player against the computer. Keyboard only. 


10 'PONTOON 
20 'copyright (c) AMSOFT 1984 


40 INK 0,21:1NK 1,0:INK 3,6 
50 ЕМУ 1,7,2,1 

60 MODE 1 

70 ус-2:сс-2 

80 aces =0 

90 сасез=@ 

100 laces=0 
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118 
120 
130 
140 
158 
168 
170 
180 
190 
200 
210 
220 
230 
240 
250 
260 
270 
280 
290 
300 
310 
320 
330 
340 
350 
360 
370 
380 
390 
400 
410 
420 
430 
440 
450 
460 


470 
480 
490 
500 
510 
520 


5-08 

5-0 

DIM suit$(4) 
suit$(1)=CHR$(226) 
Suit$(2) -CHR$(229) 
Suit$(3) -CHR$(228) 
suitS(4) CHR$(227) 
[IE 

DIM pack(52) 

FOR x- 1 TO 52 
pack(x)=0 

NEXT x 

' 


'Deal two cards to each player 


LOCATE 8,3 
PRINT "PLAYER";SPC(15)"HOUSE” 
LOCATE 7,5 

GOSUB 930 

s=stf 

IF fz11 THEN асеѕ=асеѕ+1 
LOCATE 27,5 

60508 930 

t=t+f 

ТЕ #=11 THEN caces=caces+1 
LOCATE 7,6 
GOSUB 930 
s=s+f 

IF s=21 THEN 
IF f=11 THEN 
If s=22 THEN 
IF s=22 THEN 


‘Input option-twist(t) or stick(s) 


LOCATE 10,12: PRINT "TWIST (t) OR STICK (s)";FOR z- 
1 TO 50Q:NEXT:LOCATE 10,12:PRINT SPC(25):FOR z=1 TO 
500:МЕХТ 
X$=LOWER$S(INKEY$):IF х5<>"5" AND х5<>"%" THEN 460 
IF х5-"5" THEN LOCATE 10,12:PRINT:GOTO 680 

LOCATE 7,yc*5 

yc=yc+1 

60508 930 


s=s+f 
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530 IF f-11 THEN aces=aces+1 
550 'Check score and aces 


578 1F s<22 THEN 460 

580 IF асез=@ THEN 620 

590 aces-aces-1 

600 s=s-10 

618 GOTO 570 

620 LOCATE 12,19 

630 PRINT "YOU'RE BUST" 

648 PRINT:LOCATE 12,21:PRINT"ANOTHER GAME (Y/N)" 

650 xS=LOWERS(INKEYS):IF x$«»"y" AND x$«»"n" THEN 650 

660 IF x$-"y" THEN RUN 

670 END 

680 LOCATE 27,6 

698 GOSUB 930 

700 t=t+f 

710 IF f=11 THEN caces=caces+1 

720 IF t=17 OR t=18 OR t=19 OR %-20 OR t=21 THEN GOTO 8 
89 

738 сс=сс+1 

740 LOCATE 27,сс%% 

750 GOSUB 950 

760 t=t+f 

770 IF 4-11 THEN сасеѕ= 5+1 

780 IF t»6 AND %<12 AND (асе5>0 THEN t=t+10:GOTO 880 

790 IF t«21 THEN 720 

800 IF t-21 THEN 880 

810 IF сасеѕ=0 THEN 858 

820 сасез=сасез-1: (асез= (асез+1 

838 t-t-10 

848 GOTO 790 

850 LOCATE 12,19 

860 PRINT "YOU WIN" 

878 GOTO 640 

880 LOCATE 12,19 

890 IF t«s THEN 850 

900 PRINT "THE HOUSE WINS" 

916 GOTO 640 
` 


930 'Deal card 
' 
950 card=INT(RND(1)*52+1) 
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м 


960 ТЕ pack(card)=1 ТНЕМ GOTO 950 
978 раск (сага) =1 

980 f-card-13*INT(card/13) 

990 ТЕ f=0 THEN 4-13 

1000 IF 4-1 OR f>10 THEN GOTO 1090 
1010 FOR z-1 TO 1000:z-z2*1:NEXT 
1020 IF 4-10 THEN PRINT f 
1050 IF #<10 THEN PRINT " "f" "; 

1840 IF 4>10 THEN 4-10 

1050 IF card>26 THEN PEN 3 ELSE PEN 1 

1060 SOUND 1,0,0,0,1,,1:PRINT suitS(INT((card-1)/13)*1) 
1070 PEN 1 

1080 RETURN 

1090 FOR z=1 ТО 1000:2-2%1:МЕХТ 

1100 IF 4-11 THEN PRINT " J "; 

1110 IF 4-12 THEN PRINT " Q "; 

1120 IF 4-13 THEN PRINT " K о"; 

1130 IF f«»1 THEN GOTO 1040 

1140 fz11 

1150 PRINT" A "; 

1168 coro 1060 


Bomber 


A variation on a classic theme! For one player against the computer. Keyboard or 
Joystick. 


10 'BOMBER by DAVE TOWN 

20 'copyright (c) AMSOFT 1984 

38" 

40 MODE 1:CLS:INK @,@:BORDER В:1МК 1,18:1NK 2,6:1МК 3,4 
PINK 5,15:INK 6,2:1NK 7,24:INK 8,8:1NK 9,26:1NK 10,1 
@:INK 11,20:INK 12,12:1NK 13,16:INK 14,14:1NK 15,21 

50 SYMBOL AFTER 240:SYMBOL 241,840,860,870,&7F,&7F,&3F, 
&7,&0:SYMBOL 242,&0,832,&7A,&FE,&FA,&F2,&EQ0,&0 

iscore-Q:piane$-CHRSC241) *CHR$(2420:xz2:ys2 

:а=2:6=2 

70 60508 480 


80 cLS 
90 PEN 2:LOCATE 1,15:INPUT"Enter skill : B (АСЕ) to 5 ( 
NOVICE) : ",skill 
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102 


ТЕ skill<Ü OR skill>5 GOTO 90 

skill=skill+10 

LOCATE 1,15:PRINT CHRS (18); 2LOCATE 1,15: INPUT"Enter 
speed 0 (FAST) to 100 (SLOW) : ",rate 

IF rate»108 OR rate<0 GOTO 120 

' 


"Buildings 

' 

MODE @:FOR base-5 TO 15:FOR height=21 TO INT(RND(1) 
*B*skill) STEP -T:LOCATE base,height:PEN base-2:PRI 
NT CHR$(143)+CHR$(8)+CHR$(11)+CHR$(244);:NEXT :NEXT 
PLOT 0,20,5:0RAW 640,20,4 

LOCATE 1,25:PEN 2:PRINT"SCORE";score;: LOCATE 13,25 
PRINT"HI";hiscore; 


'Main Game 
' 


LOCATE x-1,y:PRINT" I 3 
PEN 1:LOCATE x,y:PRINT planes 
IF y=21 AND х=15 THEN GOTO 29 


EN 2 
LSE GOTO 340 


'Landed 


FOR с-0 TO 1000:МЕХТ 
score=score+100-(skill*2):skill=skill-T:x=2:y=2:a=2 
:b=2:drop=0 

IF skill«10 THEN skill=10:rate=rate-20 

IF rate«Q THEN rate=0 

GOTO 150 

FOR c=Ü TO rate:NEXT 

х=х+1 

ТЕ х=18 THEN LOCATE x-1,y:PRINT CHRS(18);:x=2:y=y+1 
:ГОСАТЕ x,y:PEN 1:PRINT plane$;:PEN 2 

а$=1НКЕҮ$:1Р а$=" " AND drop=@ THEN dropzi:bzys2:a- 


х 
IF y=21 THEN Чгор=в 

IF drop=1 THEN LOCATE a,b:PRINT CHR$(252);:LOCATE a 
,b-1:PRINT" ";:b=b+1:IF b»21 THEN LOCATE a,b:PRINT" 
";:LOCATE a,b-1:PRINT” " Чгор=В: $0040 3,4 

992,10,12,0,0,18 

gaz(a-0.5)*32:gb-400-(b*16) :bomb-TEST(ga, gb) 

IF bomb» THEN GOTO 678 

gxz((x*1.5)*32) :gy7408- (у*16) zcrashzTEST(gx, gy) 

IF crash>@ GOTO 578 
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498 


500 


510 


520 
530 
540 
550 
560 
570 


580 


590 
600 


610 
620 


630 
640 
650 
669 
670 


680 
698 
700 


GOTO 230 
"Instructions 
' 


LOCATE 1,2:PEN 1:PRINT"You are piloting an aircraft 
over a des-erted city and must clear the buildings 
in order to (and and refuel. Your air- craft move 
S across the screen from left to right PRINT 
PRINT:PRINT"On reaching the right, the aircraft 
returns to the (eft A LINE FURTHER DOWN.You have а 
n unlimited supply of bombs and you can drop them 
on the buildings below by pressing the SPACE BAR. 
"PIPRINT 

PRINT:PRINT"Each time you land, the height of the 
buildings or the speed of your aircraft increases. 
"PIPRINT:PRINT:PRINT"ONCE YOU HAVE RELEASED А BOMB, 
YOU WILL NOT BE ABLE TO RELEASE ANOTHER UNTIL THE 
FIRST HAS EXPLODED !!!!"; 

PEN 2:LOCATE 1,24:PRINT:PRINT"Press any key to star 


aS-INKEYS:IF a$-"" GOTO 520 
RETURN 
D 


"Collision 
' 


LOCATE x-1,y:PRINT CHR$(32)+CHR$(32)+CHR$(32)+CHR$( 
253)+CHRS(8)+CHRS(238)+CHRS(8); 

FOR t=1 TO 10:SOUND 7,4000,5,15,0,0,5:РЕМ t:PRINT C 
HR$(253) «CHR$(B) +СНВ$ (238) +CHRS(8)+CHRS(32)+CHRS(8) 
$:РОВ tm-Q TO SO:NEXT:NEXT:PEN 2 

CLS:LOCATE 1,5:PRINT"You scored";score 

IF score>hiscore THEN hiscore=score:LOCATE 1,8:PRIN 
T"TOP SCORE! !"; 

score=O:LOCATE 1 
aS=INKEYS:IF а5- 


ress R to restart"; 


оға В" GOTO 630 ELSE GOTO 62 


9 

PEN 1:MODE 1:x=2:y=2:a=2:b=2:G0TO 90 
'Bombed building 

' 


LOCATE a,b-1:PRINT" "+CHR$(8);:PEN 4:FOR tr=1 TO IN 
T(RNDCT)*3) + core=score+5:SOUND 3,4000,10,12,0,0, 
10:LOCATE a,b:FOR += TO 4:PRINT CHR$(253)+CHR$(8)+ 
CHR$(32)+CHR$(8);:NEXT:b=b+1 

IF b-24 THEN b=b-1 

NEXT 

LOCATE 6,25:PRINT score;:drop-B:a-x:bzy:GOTO 238 
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Amthello 


The thinking person's game. Try to surround and capture your opponent's squares 


without 1 
computer. 


100 
118 
120 
130 


140 
150 
160 
170 
180 
190 
200 
210 
220 
230 
240 
250 
268 
270 
280 
298 
300 
318 
320 
330 


leaving your own squares open to capture! For one player against the 
. Keyboard only. 


"AMTHELLO Бу M.J.GRIBBINS 
'copyright (c) AMSOFT 1984 
' 


BORDER 14 
CLEAR 
MODE 1:PEN Q:PAPER 1:CLS 
INK 0,0:INK 1,14:1NK 2,18:INK 3,26 
LOCATE 2,3 OCATE 3,4: 
4,5:PRIN ОСАТЕ 5,6:PRINT"H" 
LOCATE 6,7:PRINT"E OCATE 7,8:PRINT"L":LOCATE 8,9:P 
RINT"L":LOCATE 9,1 RINT"O" 
WINDOW #1,2,39,22,25:PAPER #1,1:РЕМ #1,0:CLS #1 
PEN 0 
LOCATE #1,8,1:PRINT #1,"BLACK ALWAYS PLAYS FIRST" 
LOCATE #1,1,3:PRINT #1,"PRESS B OR W TO CHOOSE BLAC 
K OR WHITE" 
B$=INKEY$:IF B$= 
м" OR B$ 


THEN 140 
THEN QX- 


:NX=0 


GOTO 210 


OR B$="b" THEN QX-0:NX-3:G0TO 210 
CLS 41:LOCATE #1,4,3 
PRINT #1," BLACK OR WHITE ONLY" 
FOR Т=@ TO 1000:МЕХТ T 
GOTO 148 


DIM СХ(10,10),РХ(9,9),С1%(8),С2%(8),СХХ(9),СҮХ(9) 
11Х-2:11Х-2:12Х-7:22Х<7 

FOR IX-0 TO 9 

:СХ(0,172-6 

С%(1Х7,9)=6 


FOR IX-1 TO 8 

READ С1%(1%),С2% (1%) 

FOR J%= 1 TO 8 

READ PXCIX,JX) 

CXCIX,JX)76 

NEXT JX:NEXT IX 
CX(4,&)=3:CX(6,5)=0:CX(5,4&)=0:CX(5,5)=3 
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340 FOR KX-1 TO 58 

350 READ ARZ,BRZ,CRX,DRX 

360 PLOT ARX,BRX:DRAW CRX,DRX,U 

370 NEXT KX 

380 GOSUB 1460 

390 IF QX-3 GOTO 770 

400 CLS #1:INPUT #1," WHICH LINE DO YOU WANT ";EX 

410 IF EX «1 OR EZ >8 GOTO 408 

420 LOCATE #1,1,3:1NPUT 41,"WHICH COLUMN DO YOU WANT "; 
D% 

430 IF DX <1 OR DZ >8 6070 420 

440 IF CX(0X,EX)=6 GOTO 480 

850 CLS #1:10САТЕ #1,5,2:PRINT #1,"THAT SQUARE IS ALREA 
DY OCCUPIED !" 

460 FOR T=1 TO 10QB:NEXT T 

470 GOTO 400 

480 PLOT 270*(30*DX) ,70* (350*EX) :DRAW 290+(3B*D%) ,89+(30 
*EX),QX 

490 PLOT 290*(30*D:) ,70* (30*EX) :DRAW 270* (30*02),89*(30 
*EX),Q0X 

500 GOTO 540 

510 FOR MX- Ø TO 19 STEP 2:PLOT 270*(30*D1) ,70*MX* (30*E 
х) 

520 DRAW 290%(30»0Х),70%М%%(30%ЕХ),6:МЕХТ MX 

530 GOTO 400 

540 VRXX=0 

550 FOR K%=1 TO 8 

560 VRXz0:C3X-DX:C4X-EX 

570 C3X-C3X*CTIXCKX) : CAXe CAXC2X (KK) 

580 IF CX(C3X,C4X)-NX GOTO 590 ELSE 600 

590 VRX-VRX*1:GOTO 570 

600 IF С%(С3%,С4%)=6 GOTO 610 ELSE 620 

610 NEXT K%:GOTO 678 

620 IF VRX-0 GOTO 610 ELSE 630 

630 VRXXZ-VRXX*VRX 

648 C3X-C3X-CIXC(OCO : CAX 2 CAX- CX CK) 

658 IF C%(C3%,C4%)=6 GOTO 618 ELSE 660 

660 CX(C34,C4X)-QX:GOTO 640 

670 IF VRXX-0 GOTO 688 ELSE 710 

688 CLS #1:PRINT #1," THIS IS NOT A POSSIBLE CHOICE" 

690 FOR T-1 TO 1000:МЕХТ T 

700 GOTO 510 

718 EX-EX:DX-DX:VRXX-VRXX 

720 CLS #1:PRINT #1,"YOU HAVE PLAYED LINE NUMBER ";EX 
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920 
930 


970 


980 

998 

1000 
1018 
1020 
1030 
1040 
18058 
1068 
1070 
1080 
1092 
11082 
1118 
1120 


PRINT #1," AND COLUMN NUMBER ";0% 

LOCATE #1,2,4:PRINT #1,"ТНАТ GIVES YOU ";VRXX4;" SQU 
ARES(S)" 

CX(DX,EX)=QX:GOSUB 1710 

GOSUB 1460 

CLS #1:LOCATE #1,10,2:PRINT #1,"NOW IT'S MY TURN .. 


=0:VRXX=0:VRYX=0 
IF 11%*/1%=1 AND 12%*J2%=64 GOTO 860 
FOR KX-2 TO 7 
IF СХ(2,КХ) <> 6 THEN 11%=1 
IF CX(7,KX) <> 6 THEN 12%=8 
IF CX(KX,2) <> 6 THEN )17=1 
IF CX(KX,7) <> 6 THEN J2%=8 
NEXT КХ 
FOR 1%=11% TO 12% 
FOR JX=J1X TO J2% 
IF CXCIX,JX)76 GOTO 1030 
NEXT УХ:МЕХТ IX 
IF PX > Й GOTO 1000 
IF PAS%=1 GOTO 920 ELSE 940 
CLS #1:PRINT #1," DEADLOCK ! I MUST PASS ALSO.GAME 
OVER" 
FOR T=1 TO 10090:МЕХТ T:GOTO 1550 
CLS #1:LOCATE #1,18,2:PRINT 41,"I MUST PASS" 
GOSUB 2728 
IF PASX-1 GOTO 970 ELSE 990 
CLS #1:PRINT #1,"DEADLOCK! YOU MUST PASS ALSO.GAME 
OVER" 
FOR Т-1 TO 19000:NEXT T:GOTO 1550 
GOTO 408 


IF LCZ-0 THEN LCX-1:RANDOMIZE LCX:RLXsRND(LCXO 
CX1X2CXX САС): CX?X 2 СҮХ CRLX) 

60TO 1220 

VRXX=@ 


FOR K%=1 TO 8 

VRX=0:C3X=1X:C&X=JX 
C3X=C3X+C1X(KX):C4X=C4X+C2X( KX) 

IF CX(C3%,C4%)=QX GOTO 1080 ELSE 1090 
VRX=VRX+1:GOTO 1060 

IF CX(C3%,C4%)=6 GOTO 1100 ELSE 1110 
NEXT KX:GOTO 1130 

IF VR%=0% GOTO 1108 ELSE 1126 
VRXZ=VRXX+VRX:GOTO 1100 
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1130 
1148 
1158 
1160 


1170 
1188 
1190 
1200 
1218 
1220 
1230 
1240 
1250 


1260 
1270 


1280 
1290 
1300 
1340 
1320 
1330 
1340 
1350 
1360 
1378 
1388 
1398 
1400 
1410 
1426 
1430 
1448 


1450 
1460 
1470 
1480 
1490 
1500 
1510 


Appendix 3 


IF VRXX-8 GOTO 890 

IF PXCIX,JX) < PX GOTO 890 

IF PX(IX,JX) > PX GOTO 1160 ELSE 1170 

PXzPXCIX,JX) : VRYX-VRXZ: LCX70: CXX (UO) - IX: CYX (0) 742: 
ото 890 

IF VRYX > VRXX GOTO 898 

IF VRY% < VRX% GOTO 1190 ELSE 1200 

ЕСЕЙ: УВУХ=УЯХХ : СХХ (С) =1%: СУ (В) =%:60ТО 890 
LCX=LCX+1:CXX(LCX)=IX:CYX(LCX)=JX 

GOTO 890 

CX2X=CX2X:CX1Z=CX1Z:VRYX=VRYX 

CLS #1:PRINT #1," I CHOOSE LINE NUMBER ";CX2X 
PRINT #1," AND COLUMN NUMBER ";CX1% 

LOCATE #1,1,4:PRINT #1,"THAT GIVES ME ";VRYX;" SQU 
ARE(S)" 

PLOT 270+(30*CX1X),70+(30*CX2X):DRAW 290+(30*CX1X) 
‚89+(‹30*СХ2%),НХ% 

PLOT 290*(30*CX12) ,70* (S0* CX22) :DRAW 270+(30*CX1X) 
789+ (30*CX2%) „МХ 

FOR T=1 TO 1000:МЕХТ Т 

FOR КХ=1 TO 8 

VRX-8:C3X-CX1X:CA4X-CX2X 

C3X2C3X*CTX СКХ) : CAXZCAX&C2XCKX) 

IF CX(C3X,C4X)-QX GOTO 1330 ELSE 1340 
VRX-VRX*1:G0TO 1310 

IF CX(C3X,C4X)-6 GOTO 1350 ELSE 1368 

NEXT K%:GOTO 1400 

IF VR%=8 GOTO 1350 

C3X=C3X-C1X(KX):C4X=C&X-C2X (KX) 

IF С%(С3%,С4%)=6 GOTO 1350 

CX(C3X,C4X)=NX:GOTO 1370 

CX(CX1X,CX2X)=NX 

GOSUB 2720 

60508 1460 

1Ғ PASX=1 GOTO 1440 ELSE 1450 

CLS #1:PRINT #1," YOU MUST PASS":FOR T=1 TO 10 
00:МЕХТ T:GOTO 770 

GOTO 400 

FOR I%=1 TO 8 

FOR J%=1 TO 8 

FOR М%-Й TO 19 STEP 2 
242270*(30*12) :HX-70* (30*1%) : WX-HX&MX 

PLOT 2X,WX:DRAW 2X*20,WX,CXCIX,JX) 

NEXT MX:NEXT JX:NEXT IX 
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1520 ХХ=ХХ+1 

1530 IF XX-61 GOTO 1550 

1540 RETURN 

1550 CQ%=8:CN%=0 

1560 FOR I 108 

1578 FOR JX-1 TO 8 

1580 IF CX(IX,JX)-2QX THEN CQ%=CQ%+1 

1590 IF CXCI%,J%)=N% THEN CNX=CNX+1 

1600 NEXT JX:NEXT IX 

1610 IF сах > CNX GOTO 1680 

1620 IF CQX-CNZ GOTO 1630 ELSE 1650 

1630 CLS #1:LOCATE #1,25,2:PRINT H1,"DEADLOCK'" 

1640 END 

1650 CLS #1:LOCATE #1,5,1:PRINT #1,"YOU HAVE ";CQX;" SQ 
UARES;I HAVE ";CNX 

1660 LOCATE #1,11,3:PRINT #1,"I HAVE WON....!!! 1" 

1670 END 

1680 CLS #1:LOCATE #1,5,1:PRINT #1,"YOU HAVE ";CQX;" SQ 
UARES;I HAVE "; CNX 

1698 LOCATE #1,5,3:PRINT #1,"WELL DONE. YOU HAVE WON !! 


1700 END 

1710 IF CX(2,2)-QX AND (CX(3,1)-NZ OR CX(1,3)=NX) GOTO 
1720 ELSE 1730 

1720 РХ(5,1)-1:Р7(1,39-1 

1730 IF CX(7,7)-QX AND (CX(8,6)=NX OR CX(6,8)=NX) GOTO 
1740 ELSE 1750 

1740 PX(8,6)=1:PX(6,8)=1 

1750 IF CX(2,7)-QX AND (CX(1,6)=NX OR CX(3,8)=NX) GOTO 
1760 ELSE 1778 

1760 PX(1,6)=1:PX(3,8)=1 

1770 IF CX(7,2)-QX AND (CX(6,1)=NX OR CX(8,3)-NX) GOTO 
1780 ELSE 1798 

1788 РХ(6,1)-1:Р(8,39-1 

1798 IF 0%=1 OR DX-8 OR ЕХ-1 OR EX-8 GOTO 1820 

1800 IF CX1%=1 OR СХ1Х=8 OR CX2X-1 OR CX2X-8 GOTO 1820 

1810 RETURN 

1820 FOR J%=1 TO 8 STEP 7 

1830 FOR 1%=2 TO 7 

1848 IF С%(1Х,1Х3-МХ GOTO 1850 ELSE 1860 

1850 PX(IX+1,JX)=21:PX(IX-1,JX)=21 

1860 IF CX(JX,I1X)-NX GOTO 1870 ELSE 1880 

1870 PX(OJX,IX*10-21:PXC)X, IX-1)-21 

1880 NEXT IX 
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1898 FOR IX-2 TO 7 

1908 IF СХ(1Х,17258Х GOTO 1918 ELSE 1920 

1918 PX(1X+1,JX) Р%(1%-1,4%)=2 

1928 IF СУ(/5,1Х X GOTO 1930 ELSE 1940 

1938 РХ(1%,1Х%13-2:РХ(/%,1Х-19:2 

1940 NEXT IX:NEXT JX 

1958 PX(1,7)71:PX(C2,1) 

1960 PX(7,8)=1:PX(8,2)= 

1970 FOR 1%=2 107 

1980 IF CX(1,1X-1)=QX AND С%(1,1%+1)=@% THEN Р7(1,1%)=2 
5 

1990 ІР С%(8,1%-1)=@Х AND CZ(B,IX*10-QX THEN P1X(8/12)=2 


:PX(7,1)=1 
2РХ(8,73- 


5 
2000 ІР СХ(1Х-1,1)=@Х AND CX(1%+1,1)=Q% THEN PX(IX,1)=2 
5 


2010 ІР CXCI%-1,8)=Q% AND СХ(1Х%1,8)-0Х THEN PX(1X,8)=2 
5 

2020 NEXT 1% 

2030 FOR J%=1 TO'8 STEP 7 

2040 FOR 1%=4 TO 8 

2050 IF CX(JX,IX) <> NX GOTO 2140 

2060 ICX-1X-1:1F CX(JX,ICX)-6 GOTO 2148 

2070 IF CX(JX,ICX)-QX GOTO 2080 ELSE 2090 

2080 ICX-ICX-1:GOTO 2070 

2090 IF CX(JX,1CX)-6 GOTO 2110 

2100 GOTO 2140 

2110 IF ICX-0 GOTO 2148 

2120 IF CX(JX,1X*1)-0X AND CXCJX,ICX-10-6 GOTO 2140 

2130 PX(JX,ICX)-26 

2140 IF CXCI%,J%) <> NX GOTO 2230 

2150 ICX-IX-1:1F CX(CICX,JX)-6 GOTO 2230 

2160 IF CX(ICX,JX)-QX GOTO 2178 ELSE 2180 

2170 ICX-ICX-1:GOTO 2160 

2188 IF CX(ICX,J2)-6 GOTO 2200 

2190 GOTO 2230 

2200 IF IC%=B GOTO 2230 

2218 IF CX(1X+1,JX)=QX AND CXCICXZ-1,JX)26 GOTO 2250 

2220 PX(ICX,JX)=26 

2230 NEXT IX 

2248 FOR IX-1 TO 5 

2250 IF CX(JX,IX) <> NX GOTO 2340 

2260 ICX-IX41:1F CX(JX,ICX)-6 GOTO 2340 

2270 IF CX(JX,ICX)-QX GOTO 2280 ELSE 2298 

2280 ICX-ICX*1:GOTO 2270 
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2290 IF CX(JX,1CX)-6 GOTO 2310 

2300 GOTO 2340 

2310 IF ICX-9 GOTO 2348 

2320 IF CX(JX,12-10-0X AND CZCJX,ICX*1076 GOTO 2340 

2330 PXC(JX,ICX)-26 

2340 IF CX(IX,JX) <> NX GOTO 2430 

2350 ICX-IX*1:1F CXCICX,JX)-26 GOTO 2430 

2360 IF CX(ICX,JX)-QX GOTO 2378 ELSE 2580 

2378 ICX-1CX*1:GOTO 2360 

2380 IF CXCICK,J%)=6 GOTO 2400 

2390 GOTO 2430 

2400 IF ICX-9 GOTO 2438 

2410 IF CX(1X2-1,J2)72QX AND CX(ICX+1,J%)=6 GOTO 2430 

2420 PX(ICX,JX)=26 

2430 NEXT 1%:МЕХТ JX 

2440 IF CX(1,1)=NX GOTO 2450 ELSE 2460 

2450 FOR 1%=2 TO 6:PX(1,1X)-220:PXCIX,12220:NEXT IX 

2460 IF CX(1,8)-NX GOTO 2470 ELSE 2480 

2470 FOR 1%=2 TO 6:РХ(1Х,8)-20:РХ(1,9-1Х)-20:МЕХТ IX 

2480 IF CX(8,1)-NX GOTO 2490 ELSE 2500 

2498 FOR IX-2 TO 6:РХ(9-1Х,1)-20:РХ(8,1%)-20:МЕХТ 1% 

2500 IF CX(8,8)-NX GOTO 2510 ELSE 2520 

2516 FOR 1Х-3 TO 7:РХ(1%,8)=20:РХ(8,1%)=20:МЕХТ IX 

2520 IF CX(1,1) <> 6 THEN РХ(2,2)=5 

2530 ІР CX(1,8) <> 6 THEN PX(2,7 

2546 IF CX(8,1) <> 6 THEN PX(7,2 

2550 IF CX(8,8) <> 6 THEN РХ(7,7 

2560 PX(1,1)230:PX(1,8)230:PX(8,1)-30:PX(8,8)-30 

2570 FOR IX-3 TO 6 

2580 IF CX(1,1X)7NX THEN P%(2,1%)=4 

2590 IF CX(B,IX X THEN РХ(7,1Х 

2600 IF CXCIX,1 X THEN PX(IX,2 

2610 IF CX(12,8)zNX THEN РХ(1%,7)=4 

2620 NEXT IX 

2630 IF CX(7,1)-QX AND СХ(4,1) =МХ AND С%(6,1)=6 AND СХС 
5,1356 THEN P%(6,1)=26 

2640 IF CX(1,7)=QX AND CX(1,4)=NX AND CX(1,62-6 AND СХС 
1,5)=6 THEN PX(1,6)=26 

2650 IF CX(2,1)=QX AND CX(5,1)=NX AND CX(3,1)=6 AND СХС 
4,1256 THEN PX(3,1)=26 

2660 IF CX(1,2)=QX AND СХ(1,5)=НХ AND CX(1,3)=6 AND СХС 
1,8356 THEN PX(1,3)=26 

2670 IF CX(8,2)=QX AND CX(8,5)=NX AND CX(8,3)=6 AND СХС 
8,4256 THEN PX(8,3)-26 
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2680 IF СХ(2,8)-8Х AND CX(5,8)-NX AND CX(3,8)=6 AND СХС 
4,8)=6 THEN PX(3,8)-26 

2690 IF CX(8,7)-QX AND CX(B,G)-NX AND CX(8,5)-6 AND СХС 
8,6)=6 THEN PZ(8,6)-26 

2700 IF C%(7,8)=@% AND C%(4,8)=N% AND CX(5,8)=6 AND СХС 
6,8)-6 THEN P%(6,8)=26 

2710 RETURN 

2720 РА5%-0 

2730 FOR 11-1 TO 8 

2740 FOR J%=1 TO 8 

2750 IF CX(12,J3)-QX GOTO 2780 

2760 NEXT JX:NEXT IX 

2770 PAS%=1:RETURN 

2780 FOR KX-1 TO 8 

2790 VRXs0:C3X21X:C4XsJX 

2800 С3Х-С3Х%С17(КХ):С4Х-с6Х%С2Х (KX) 

2810 IF C3X < 1 OR C3X > 8 GOTO 2820 ELSE 2830 

2820 NEXT КХ:60Т0 2760 

2830 IF C4% < 1 OR C4% > 8 GOTO 2820 ELSE 2840 

2840 IF CX(C3%,C4%)=N% GOTO 2850 ELSE 2860 

2850 VRX-VRZ*1:G0TO 2800 

2860 IF CX(C3X,C4X)-QX GOTO 2820 ELSE 2870 

2870 IF VRX > @ THEN RETURN 

2880 GOTO 2820 


2890 DATA 1,0,30,1,20,10,10,20,1,30,1,1,1,1,3 

2900 DATA 3,3,3,1,1,0,1,20,3,5,5,5,5,3,20,-1,1,10,5,5 
2918 DATA 0,0,5,5,10,-1,0,10,5,5,0,0,5,3,10,-1 

2920 DATA -1,20,5,5,5,5,5,3,20,0,-1,1,1,3,3,3,3,1,1,1,- 


1,30,1,20,10,10,20,1,38 

2930 DATA 263,100,263,120,270,130,255,130,255,130,255,1 
40,255,140,270,148 

2940 DATA 278,140,270,150,270,150,255,150,255,160,270,1 
60,270,168 ,270,180 

2950 DATA 270,180,255,180,270,170,255,170,270,190,270,2 
10,270,200,255,200 

2960 DATA 255,200,255,210,255,220,270,220,270,220,270,2 
30,270,230,255,230 

2970 DATA 255,230,255,940,255,240,270,240,255,250,270,2 
50,270,250,270,260 

2980 DATA 278,260,255,260,255,250,255,270,270,280,270,3 
00,270,500,255,300 

2990 DATA 255,310,255,330,255,330,270,330,270,330,270,3 
10,270,310,255,318 

3000 DATA 255,320,270,520 
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3010 DATA 310,355,310,375,350,355,335,355,335,355,335,3 
65,335,365,350,365 

3020 DATA 350,365,350,375,350,375,335,375,365,355,380,3 
55,380,355,380,375 

3038 DATA 380,375,365,375,380,365,365,365,418,355,410,3 
75,810,365,395,365 

3040 DATA 395,365,395,375,425,355,440,355,440,355,440,3 
65,446,365,425,365 

3050 DATA 425,365,425,375,425,375,440,375,455,375,455,3 
55,455,355,070,355 

3060 DATA 470,355,470,365,470,365,455,365,485,375,500,3 
75,500,375,500,555 

3070 DATA 515,375,515,355,515,355,530,355,530,355,530,3 
75,530,375,515,375 

3080 DATA 515,365,530,365 


Raffles 


Break into His Lordship's house and steal the booty. Lots of obstacles to trip you up, 
and you must beware of the dog! For one player against the computer. Keyboard or 
Joystick. 


18 ‘RAFFLES by DAVID RADISIC 
20 'copyright (с) AMSOFT 1985 


40 MODE Q:INK Q,0:BORDER @:1NK 1,26:INK 2,15:1NK 3,25 

50 INK 4,14:1NK 5,24,12:INK 6,0:INK 7,0:INK 8,0:PAPER # 
1,7 

60 delayz200 

70 DIM objx(5,28) ,objy (5,20) ,gemx (5,20) ,gemy (5,20) 

80 GosuB 380 

90 GOSUB 720 

100 pause-200:G0SUB 340 

110 IF gems=@ THEN GOSUB 970 

120 PEN 4 

130 FOR i-10 TO 12 

140 LOCATE 15,i:PRINT"SWAG"; 

150 NEXT 

160 PAPER @:CLS#2:PAPER 8 

170 GOSUB 1170 

180 cosuB 1238 
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490 
508 
510 


570 
580 


590 
600 


GOSUB 1378 

GOSUB 1518 

IF rm=@ THEN GOSUB 1900 

IF dead=@ THEN 168 

pause=108:GOSUB 540 

PAPER @:CLS:PEN 1 

LOCATE 4,3:PRINT"Do you want"; 

LOCATE 4,5:PRINT"Another game"; 

PEN 5:LOCATE 9,7:PRINT"Y/ 

i$-UPPERSCINKEYS) :ІҒ i$<>" AND i$«»"N" THEN 280 

IF i$="N" THEN MODE 2:PEN 1:STOP 

RUN 

If dog=1 THEN RETURN 

dog=1:dogx=minx (гт) :dogy=miny (rm) 

RETURN 

FOR іоор-1 TO pause 

FRAME 

NEXT 

RETURN 

rm=1:xp=6:yp=4 

SYMBOL 240,8,8 

SYMBOL 241,0,0 
9 
9 


R$(224):dog=BÜ:stolen=@ 
,8,8 


SYMBOL 242,0, 
SYMBOL 243,0, 
SYMBOL 244,8,8 
SYMBOL 245,8,8,8,8,15,0, 
SYMBOL 246,8,12,13,14,12,12,8,8 

SYMBOL 247,8,12,12,14,13,12,8,8 

SYMBOL 248,8,24,88,56,24,24,8,8 

SYMBOL 249,8,24,24,56,88,24,8,8 

SYMBOL 250,0,0,255,129,129,129,255,0 

SYMBOL 251,28,20,20,20,20,20,20,28 

SYMBOL 252,0,0,255,255,255,255,255,0 

SYMBOL 253,28,28,28,28,28,28,28,28 

SYMBOL 255,195,165,60,126,90,60,36,24 

ENT 1,12,-4,1 

ENT -2,-1000,60,-3020,40 

ENV 1,10,1,5,2,-4,1,2,-1,20 

winduS (1) -STRINGS(2,250) :windw$(2)=CHRS(251)+CHRS(8 
)*CHRS (18) «CHRS(25 1) «CHRS CB) +CHRS (10) *CHRS (251) 
door$(1)-STRINGS(2,252) :door$(2) -CHR$(253) +СНВ$ (8) * 
CHRSCTQ)*CHRS(253) -CHRS (B) &CHRS (10) +СНВ$ (253) 
switch$C1,0) -CHRS (246) :swi tch$CT, 1D -CHRS(247) 
switch$(2,8)=CHRS(248) :suitch$(2,1) CHR$(249) 


9,0, 
,8,8 
8,8, 
0,0, 
2,0 
2 
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gem$-CHR$(144):0bjS-CHRS$(233) :dogS$-CHR$(255) 
hitSzCHRS(246) «CHR$(248) + СНЕЅ (247) «CHR$(249) +CHRS(2 
52) *CHR$(253) *CHRS(250) *CHR$(251) *gem$*obj$*dog$ 
RESTORE 3010 

FOR 1=1 TO 5 

READ minxCiD ,minyCi) ,maxxCiD ,maxyCi) 

READ dir(i,1),dir(i,2),dir(i,3),dir(i,&) 

NEXT 

WINDOW #1,minx(rm)-1,maxx(rm)+1,miny(rm)-1,maxy (rm) 
+1 

WINDOW #2,1,14,1,25 

CLS #1:PAPER 40,8 

RETURN 

ORIGIN 50,50 

INK 6,24,12 

RESTORE 3060 

GOSUB 1288 

LOCATE 5,20 

PEN 5:PRINT"»"; 

PEN 1:PRINT"Escape Routes"; 

PEN 5:PRINT"«"; :PEN 1 

LOCATE 10,2: РВІМТ"1М"; 

pausez308:GOSUB 340 

CLS:LOCATE 1,3:INK 6,0 

PEN 1:PRINT man$;" You The Thief":PRINT 

PEN 2:PRINT LEFTS(door$(1),1);LEFTS(door$(2),1);" р 
oors":PRINT 

PEN 3:PRINT switch$(1,8);switch$(2,0);" LightSwitch 
COFF)" 

PEN 3:PRINT switch$(1,1);switch$(2,1);" LightSwitch 
CON)": PRINT 

PEN 4;PRINT LEFTS(windw$(1),1);LEFTS(windw$(2),1);" 
Windows": PRINT 

PEN 5:PRINT gem$;" Precious Gems":PRINT 

PAPER 1:PEN Q:PRINT obj$;" Obstructions ":PEN 1:PA 
PER Q:PRINT 

PEN 1:PRINT dog$;" The Dog" 

PEN 5:PRINT:PRINT:PRINT 

PRINT" Use Joystick":PRINT" Or Cursor keys" 
dummy=REMAIN(1) 

AFTER delay*4,1 GOSUB 540 

RETURN 

' 


"Generate Gems/obstacles 
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980 ' 
998 Е 
1008 
1010 


1028 
1038 
1040 
1050 
1068 
1070 
1080 
1099 
1100 
1110 
1120 
1130 
1140 
1150 
1160 
1170 
1180 
1190 
1200 
1210 
1220 
1230 
1240 


1250 
1260 
1270 


1280 
1290 
1300 
1310 
1320 
1330 


OR гоот=1 TO 5 
деп NT(RND*8)+2:objr=INT(RND*10)+5 
min inx(room):miny=miny(room) 


xy=maxy (room) 

FOR і-1 TO gemr 

X= INTCRND* (maxx-minx+1))+#minx 
y=INTCRND*(maxy-miny+1))+miny 
gemx(roon,i)-x:gemy(room,i)-y 
gems=gems+1 

NEXT i 

FOR i=1 TO objr 

X2 INT(RND*(maxx-minx*1)) *minx 
y=INTCRND*(maxy-miny+1))+miny 
objx(room,i)=x:objy(room,i)=y 
NEXT i 

gems (room) =gemr:obj (room) =objr 
NEXT room 

с 

RETURN 


imaxx=maxx(room):ma 


ON rm GOTO 1180,1190,1200,1210,1220 


RESTORE 2670:RETURN 
RESTORE 2740:RETURN 
RESTORE 2810:RETURN 
RESTORE 2880:RETURN 
RESTORE 296Q:RETURN 
PAPER Q:READ rm$:PAPER 8 


WINDOW #1,minx(rm)~1,maxx(rm)+1,miny(rm)-1,maxy (rm 


2%1:С15 #1 


РЕМ 1:LOCATE 1,1:PRINT SPACES(19); 


LOCATE 1,1:PRINT "Room ¿rm$s; 


IF Lights(rm) THEN INK 7,18:INK 
INK 8,0 


:IF а$="ЕМО" THEN RETURN 
" THEN 2180 
THEN 2260 


THEN 2428 


1340 PRINT'"***ERROR oes"; 
1350 STOP 
1360 ' 
1370 ‘Display gems/objects 
1380 ' 

Appendix 3 


8,10 ELSE INK 7,0: 


THEN GRAPHICS РЕМ 1:GOTO 2340 


THEN GRAPHICS PEN 6:GOTO 2348 
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1398 
1400 
1410 
1420 
1430 
1440 
1450 
1460 
1478 
1488 
1498 
1500 
1518 
1520 
1530 
1548 
1550 
1560 
1578 
1580 
1598 
1608 
1610 
1628 
1638 
1640 
1650 
1660 
1670 


1680 
1698 
1700 
1718 
1720 
1738 


1748 
1750 
1760 
1770 
1788 
1798 
1808 


PEN 6 
FOR 1=1 TO obj(rm) 
LOCATE objx(rm,i),objy(rm,i) 


"PRINT obj$; 


NEXT 

PEN 5 

FOR i=1 TO gems(rm) 

LOCATE gemx(rm,i),gemy(rm,i) 

PRINT gen$; 

NEXT 

PEN 1:LOCATE xp,yp:PRINT man$; 

RETURN 

xf-ü:yf-Q:PEN 1 

IF INKEY(Q)«»-1 OR INKEY(72)«»-1 THEN yf=-1 
IF INKEY(2)<>-1 OR INKEY(73)«»-1 THEN yf=1 
IF ІМКЕҮ(8)<>-1 OR INKEY(74)<>-1 THEN xf=-1 
IF INKEY(1)<>-1 OR INKEY(75)«»-1 THEN xf=1 
IF xf=@ AND yf=@ THEN 1638 

LOCATE xp+xf,yptyf:ht$=COPYCHRS(#0) 

IF ASCCht$)2239 AND ASC(ht$)«246 THEN 1510 
IF ht$«»" " THEN 1660 

LOCATE xp,yp:PRINT " "; 

PAPER @:LOCATE 15,5:PRINT" Ы 
xp=xp+xf:yp=yp+yf 

LOCATE xp,yp:PRINT man$; 

IF dog>B THEN dog=dog MOD 2+1:1Ғ dog=2 THEN 2550 
GOTO 1518 

hitzINSTR(hit$,ht$) :charzASC(MIDS$(hit$,hit,1)) 

ON hit GOTO 1690,1690,1690,1690,1750,1750,1850,190 
0,1970,2090,2650 

GOTO 1688 

IF hit»2 AND hit<5 THEN сһаг-сһаг-1 

IF hit«3 THEN сһаг=сһаг+1 

PEN 3:LOCATE xp*xf,yp*yf:PRINT CHR$(char); 
Lights(rm)=Lights(rm) XOR 1 

IF Lights(rm) THEN INK 7,10:ІМК 8,10 ELSE INK 7,0: 
INK 8,0 

GOTO 1518 

IF xf<>@ AND yf<>@ THEN 1630 

IF xf<Ø THEN dir=4 ELSE IF хҰ>Й THEN dir=3 

IF yf«8 THEN 91г=1 ELSE IF yf»B THEN dir=2 

IF dir(rm,dir)--1 THEN 1630 ELSE rm=dir(rm,dir) 

IF dog>@ THEN GOSUB 310 

IF dir=1 THEN хр=6:ур=таху (га) 


:PAPER 8 
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1810 IF dir=2 THEN xp=6:yp=miny(rm) 

1820 IF dir=3 THEN x inx(rm) :ур=15 

1830 IF dir=4 THEN xpzmaxx(rm):yp-13 

1840 RETURN 

1858 IF хр>5 AND хр<8 THEN 1880 

1860 IF хр<6 THEN dir=4 ELSE dir=3 

1870 GOTO 1788 

1880 IF yp>13 THEN dir=2 ELSE dir=1 

1890 GOTO 1780 

1900 PAPER Q:CLS:PEN 1 

1910 LOCATE 3,3:PRINT"You have escaped"; 

1920 LOCATE 9,5:PRINT"with"; 

1930 IF gems-stolen THEN LOCATE 8,7:PRINT"ALL"; ELSE LO 
CATE 9,7 

1940 PRINT USING " ##";stolen; 

1950 PEN 5:LOCATE 9,9:PRINT"Gems"; 


1960 dead=1:RETURN 
1970 LOCATE xp,yp:PRINT" "; :хр=хр+х#:ур=ур+уї 
1980 


1990 1=1+1 

2000 IF i»gems(rm) THEN 1510 

2010 IF gemx(rm,i)«»xp OR gemy(rm,i)<>yp THEN 1990 

2020 IF i-gems(rm) THEN 2050 

2030 gemx(rm,i)-gemx(rm,gems(rm)) 

2040 gemy(rm,i)=gemy(rm,gems(rm)) 

2050 gems(rm)=gems(rm)-1:stolen=stolen+1 

2060 MOVE 400,158+(stolen*2),1,1:DRAW 520,150*(stolenx2 
2,1,1 

2070 SOUND 129,248,10,12,0,1 

2080 GOTO 1980 

2090 noise=INT(RND*15) 

2100 SOUND 1,3000,10,noise,0,0,10 

2110 PAPER 0:10САТЕ 15,5:PRINT"Crash 

2120 IF noise<1@ OR delay=5@ THEN 1638 

2130 де(ау-де(ау-50 

2140 dummy=REMAIN(1) 

2150 AFTER delay*4,1 GOSUB 310 

2160 GOTO 1630 


2180 "Оган doors 

2200 READ no,dr$ 

2210 IF dr$-"V" THEN dr=2 ELSE dr=1 
2220 PEN 2 


continued on the next page 


Appendix 3 Some Programs for you... 


2230 pic$=door$(dr):GOSUB 2500 
2240 GOTO 1280 


2250 ' 

2260 'Draw windows 

2270 ' 

2280 READ по,мі$ 

2290 IF wi V" THEN wi=2 ELSE мі=1 
2300 PEN 4 


2318 picS=windwS(wi):GOSUB 2500 
2320 GOTO 1280 

2330 ' 

2348 ' Draw Lines 

2350 ' 

2360 READ x1,y1,x2,y2 

2370 MOVE x1,y1,,0 

2380 DRAW x1,y2,,0:DRAW х2,у2,,0 
2390 DRAW x2,y1,,0:0RAW х1,у1,,0 
2400 GOTO 1280 


2410 

2420 'Draw switches 

2430 ' 

2440 READ no,sw$ 

2450 IF sw$-"L" THEN sw=1 ELSE sw=2 
2460 PEN 3 


2470 picS=switch$(sw,8):GOSUB 2500 

2480 GOTO 1280 

2490 ' 

2500 'Print char 

2510 ' қ 

2520 READ x,y:LOCATE x,y:PRINT pic$; 

2530 по-по-1:ІҒ no>B THEN 2520 

2540 RETURN 

2550 PEN 1:LOCATE dogx,dogy:PRINT" "; 

2560 manS=CHR$(225) 

2570 1Е (dogx-xp AND dogy-yp) OR (dogx-xp*xf AND dogy=y 
p*yf) THEN 2650 

2580 IF dogx«xp THEN dogx=dogx+1 

2590 IF dogx>xp THEN 

2600 IF dogy«yp THEN 

2618 IF dogy>yp THEN dogy=dogy-1 

2620 LOCATE dogx,dogy:PRINT dog$; 

2630 SOUND 1,0,RND*40,10,1,2,31 

2640 GOTO 1510 

2650 PRINT"SNAP"; 
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2660 dead-1:RETURN 

2678 DATA Hallway 

2680 DATA L,64,308,226,4 

2690 DATA D,2,H,6,3,6,22 

2700 DATA D,2,V,4,12,9,11 

2710 DATA S,1,L,4,11 

2720 DATA S,1,R,9,14 

2730 DATA END 

2740 DATA Lounge 

2750 DATA L,2,308,258,4 

2760 DATA D,1,V,10,12 

2770 DATA W,1,H,6,3 

2780 DATA W,1,V,2,12 

2790 DATA S,2,R,10,11,10,15 

2800 DATA END 

2810 DATA Dining room 

2820 DATA L,2,508,258,4 

2830 DATA W,1,V,10,12 

2840 DATA W,1,H,6,3 

2850 DATA D,1,V,2,12 

2860 DATA 5,2,1,2,11,2,15 

2870 DATA END 

2880 DATA Kitchen 

2890 DATA L,2,276,384,4 

2900 DATA D,2,H,6,5,6,22 

2910 DATA W,1,H,10,22 

2920 DATA W,1,V,14,13 

2930 DATA D,1,V,2,13 

2940 DATA 5,1,1,2,16 

2950 DATA END 

2960 DATA Pantry 

2970 DATA 1,2,276,256,0 

2980 DATA D,1,V,10,12 

2990 DATA 5,1,8,10,11 

3000 DATA END 

3010 DATA 5,4,8,21,0,4,3,2 

3020 DATA 3,4,9,21,-1,-1,1,-1 

3050 DATA 3,4,9,21,-1,-1,-1,1 

3040 DATA 3,6,13,21,1,0,-1,5 

3058 DATA 3,6,9,21,-1,-1,4,-1 

3060 DATA L,64,308,480,100 

3076 DATA F,258,98,294,102 

3080 DATA F,250,306,294,310 

3090 DATA F,390,94,430,186 
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3108 
3118 
3128 
3138 
3148 
3158 
3168 
3170 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


F,398,302,430,314 
F,474,240,488,278 
F,5474,124,688,154 
ғ,58,240,72,270 
1,226,398 ,322,188 
1,160,180 „480,100 
L,64,1880,160,100 
END 


If you've enjoyed these games, you may like to join the 
AMSTRAD COMPUTER USERS' CLUB. As well as many other 
benefits and privileges, you get a free monthly magazine which 
includes program listings for games and ‘utilities’, special 
features, free competitions, and up to the minute information 
-from the source! 
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Аррепаїх 4 
Index 


(Note that all references given in this index correspond to chapter 
and page number, e.g. 1.42 referstochapterl page 42.) 


A 


tA... 
Aborting system disc functions 
ABS .. 
AFTER 
Amplifier (е: 
AMSDOS ...... 
AMSDOS commands 
AMSDOS error messages . 
AMSDOS filenames .. 


nal 


5.7 
‚ 5.14 7.31 7.32 
5.2 5.3 
m . 3.4 8.18 
AND(LOGO) . 6.11 
Animation .. 8.53 


Arithmetic operations 
Arithmeticoperations (LOGO) 


ASCII characters 
ASCII files . 
ASM 


142 1.72 5.8 
114 1.75 41 
1.22 3.1 7.32 87 


Backup master disc 
BASIC .... 
BASIC disc .. 
BF .. 
BIN$ 
Binary files 
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Binary numbers 
Bit .. 


CALL .... 
CAPS LOCK key .. 
Cassette operation 
CAT .. 
CAT (cassette) . 
CATCH . 
CHAIN . 
CHAIN (cassette) 
CHAIN MERGE 
CHAIN MERGE 
Changing discs 


CLOSEIN (cassette) 
CLOSEOUT .... 


CLOSEOUT (cassette) 


Configuringa disc . 
Connectinga mains plug 
Connecting up the computer .. 
Connecting peripherals ..... 
Console control codes (CP/M) 
Console commands 


17 738 739 740 ' 


Control codes 

Copy cursor editing i 
COPYCHR$ š 
COPYDISC . 75 5.22 
Copying discs 174 5.22 


Copying files 142 5.10 
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DATA ... 8.12 7.27 8.31 
Data only format .. 5.25 7.75 
DC sockets 1213 
DDT .. 5.27 
DEC$ 8.13 
ЕЕ .. 6.30 
DEFFN 4 

DEFINT 3.14 
DEFREAL 3.14 
DEFSTR 3.15 
DEG .. 3.15 
DEL кеу 1.15 
DELETE 3.16 


„DEPOSIT 6.29 
DERR 3.16 7.31 7.32 
DI 3.17 8.30 


DIM ‚ 2.3 3.18 7.28 
DIR (CPM) i 
DIR(LOGO 6.22 
ІШІ ..... 58 
Direct console commands 5.18 
Discs .. 

IDISC 1.73 5.8 
DISCC! E 76 5.22 
DISCCOPY 14 5.22 
Discdirectory 5.1 7.31 
Disc drive (additional) . . 1.8 1.75 7.40 
DISC DRIVE2 socket 1.9 7.40 
Disc file commands (LOGO) 

IDISC.IN 

Discorganisation 


IDISC.OUT 
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5.14 7.31 


Expansion characters 
EXPANSION socket 
Exponentiation .. 
External commands 
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FALSE ...... 6.20 
Ер... 618 
FENCE . 616 
FILECOPY 42 
Filecopying tables 

Filenames . 

i 52 
ЕШ... ) 
FIRST 6.8 
FIX 3.28 
Flashing colours 1.50 
Flow of control commands (LOGO) . 6.26 
Flush sound channels 3.73 8.38 

328 
140 5.25 
381 8.22 
Format (disc) 
FPUT 


FRAME 
FRE 


G 
124 3.30 
Graphic screen commands (LOGO) 6.15 
Graphics .... 1.53 8.47 
GRAPHICS PAPER 3.30 8.50 
GRAPHICSPEN . 331 848 
GPROP . 6.22 

H 


7.45 7.46 8.56 
. 5.3 5.12 5.13 
19 
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Hexadecimal numbers 
НІМЕМ ... 


3.31 
8.11 
3.32 


Hold sound channels . 9.73 8.38 
HT... 6.18 
ІВМ format .. ‚5.25 7.45 
IF ..... .28 3.32 
IF(LOGO) 

Indicator lamp (disc) 


INKEY$ 
Ink modes 
INP .. 

INPUT . 
INPUT (cassette) 
Inserting discs 
INSTR 


JOY .. 
Joystick commands (LOGO) . 
Joysticks .. 
JOYSTICK 


KEY .... 
KEYDEF 
Keyboard 
KEYP .. 
Keywords 


. 3.87 7.22 
3.38 7.22 7.43 
15 7.21 7.22 7.23 7.43 


LINE INPUT (cassette) 
LIST ... 
LIST(LOGO) 
List processing commands (LOGO) 
LOAD (cassette) 
LOAD(LOGO) . 
Loading software .. 
Loadingthe Welcome program 
LOCAL . 


M 
Machine code ... А 
Mains plug connections 11 
MAKE 613 


MEMORY 

Memory map 7.45 
Menu. . 2.5 3.51 3.52 
MERGE 


MERGE (cassette) 
MID$ . 
MIN .. 


Appendix 4 Index 


Mixedcalculations . 
MOD 
MODE 
Modulator/power supply (MP2) 
Monitor .... 


13 L5 1.65 
12 
1213 739 


.. 3.48 
1.30 3.48 7.27 7.30 8.16 


ONBREAKCONT . 
ON BREAK GOSUB 
ON BREAK STOP 


OPENIN (cassette) .. 
OPENOUT ...... 
OPENOUT (cassette) 


PEN. 147 3.56 
Peripheral management 
Peripherals 


POWER switch 
PPROP . 
PR 
Primitives 
.PRM Ў 
PRINT . 1.22 3.59 8.22 
Print formatting .. .61 8.22 
PRINTSPC . 60 8.23 
PRINTTAB 


Procedures 
Property list commands (LOGO) 
Protected files . 
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3.52 3.77 7.7 8.44 


3.66 
6.27 
. 1.20 1.21 
. 9.67 8.33 
. 8.67 7.29 
3.68 
1.31 3.68 7.27 


1.23 1.42 3.70 
. 4.9 
6.27 
121 


Index Appendix 4 


SAVE .. 
SAVE (cassette) . 
SAVE(CP/M) 


. 141 143 3.71 


SAVE(LOGO) 6.23 
Saving to cassette 4.12 
Saving variables . 2.9 3.90 5.5 


8 
SIN 


1.65 3.73 7.24 


Sound commands (2060). 
Soundenvelope planner 
SPACE$ 


Speech synthesiser . 
SPEEDINK 
SPEEDKEY 


. 19 1.65 7.39 


System primitives (LOGO) 
System properties (LOGO) 
System tracks (CP/M) .. 
System variables (LOGO) 


TAPE socket 


TESTR . 
Text screen commands (LOGO) 
Text/window planners 


ТІМЕ 3.85 


TO. 3.85 
TO(LOGO) 6.14 
Tone envelope .. 1,69 3.21 8.41 
TOPLEVEL . 6.29 
Transient commands .. 5.20 
Transparent writing . 75 851 
TROFF . 

TRON 

TRUE 

TS... 

Turnkey BASIC disc 

Turnkey CP/M disc 


Turtle graphics commands (LOGO) 
TV receiver .. 
ТУРЕ (CP/M) 
TYPE(LOGO) 


UNT.. Я 
UPPER$ 3.86 
User defined characters 3.79 8.21 
User definedkeys 3.37 7.21 7.22 7.23 
IUSER 

USING . 

VAL .. te 
Variables . 1.25 7.32 815 
Variables (LOGO) 6.4 6.13 
Variables (saving) 3.90 5.5 
Vendor format 5.25 7.44 
Vertical hold control 14 
Vibrato .... 8.42 
VOLUME control 1.9 1.65 
Volume envelope 3.23 8.38 
VPOS .... n 3.87 


Window planners .. 
WINDOWSWAP . 


54 
2.11 3.89 7.5 8.26 


.- 3.92 


... 9.92 8.22 
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